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8 A. ST LOADING PROCEDURE 
53 REMOTE LOADING PRMCEDURE 
60 4 STARTING PROCEDURE 
61 h WITH TYPE AVAILABLE 
62 WIT ELETYPE 
63 S. PROCEDURES 
64 6. CONSOLE SWITCH SETTINGS 
65 ?, CONTROL SWITCHES (TELETYPE) 
6 8: PROGRAM TEST TABLE & DIRECTORY 
57 9. VT LOGIC TEST 
68 10. VT CHARACTER SET TEST 
&3 11. VT FIELD CONTROL TES 
a tS WT ERD OF LINE TEST 
( ‘ 
73 14 V END oF EST 
i Yee ter 
75 17 VT FOCUS TEST 
76 18 VT T CASE 
77 19 VT CURSOR CONTROL TEST 
78 20. VT ODD RODRESS TEST 
73 21. VT RUNALL 
gC 22. BScTT KBD KBD [bel 
81 23. ASCIT LIGH H eal ITCH TEST « 
ge 24. ASCII KBD CHARACTERS SET TEST 
93 2s. Ascl KBD REPEATABILITY TEST 
84 2b. VTe0 SYSTEM T’ 
ge 27. VT/KBD SUBTEST SELECTOR 
86 . 28. — TEST EXECUTION TIME TABLE 
87 29. LISTING 
gg 1. HBS TRACT 
g LELERELERELLERE 
a} THIS PROGR PROGRAN TESTS, EXERCISES AND DIAGNOSES THE VT20 SYSTEM 
a5 TEEN INDIV SPLRYS) IN ITS ENTIRE Tests titer CRCTL TATE : 
= feet META eT Ay THE SYSTEM IS TESTED 
Qs ON A UNIT & 1 DISPLAY) BASES. THIS HOLDS TRUE 
14 IN ALL Tests EXCEPT Seo on TEST 21. Y) PRE THE VT20 IS TESTED as 
97 SLA CONFIGURATION WITH ELTHER A POP-8 
= We Hg IMiake iene HSE 
100 DI 1 Eye AR ADe T{eDZVTECPOP Ti W/DL11°S), 
191 M = hi-D2vTe<POR-11 WDHIL'S) OR ND-08-D1 POP-8 W/ 
10 S AM Bey SERIAL LINE INTERE ACE Of AND A 
104 DATA RECEIVE/T iT ROUTINE. REFER TO THE SPECIFIC 
105 MAINDEC FOR A FURTHER EXPLAINATION. THIS DIAGNOSTIC IS SET 


“e 
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DBYT 
106 UP TO OPERATE ’WITH’ OR "WITHOUT? A rele usto fe A 
107 TELETYPE ISN’T AVAILABLE PROGRAM 
108 REPORT ERRORS AND COLLECT NEEDED IN ORRATION Ye PROGRAM 
109 Y THE SAME WITH OR WITHOUT THE TELETYPE. 
110 T IS T THAT THE DISPLAY Ti PR 
lili ULL ORE RUNNING T M 
lle THIS IS NECESSARY SINCE THE DISPLAY IS USED IN CONJUNCTIO 
tt H THE *KBD’ (FUNCTIONAL & ASCII KEYBOARD) TESTS 
11s 2 REQUIREMENTS (EQUIPMENT 8&8 MEMORY) 
t 6 HLLERLELELELA SEL REL SARERA SESE EL RLEL REL EL RAZR EK RHEE RL LS LE RERESE 
118 A. VT20 WITH EITHER 8 OR 16K OF MEMORY 1 TO 4 TUBES. 
1B B. HOS? HOUTER we RoncoLe’ DEVICE (TEST 21 ONLY) 
lel MD-11-D2VTE FOR pop it HOST W/DL11 INTERFACE 
le & Mp i peviG F pop 4 T W/ DH11 INTERFACE 
1e3 VT PDP-8 HOST W/ KL8J INTERFACE 
125 3. LOADING PROCEDURE 
158 SREAAAAALARAALARA LALA FHELARKERERELRE 
128 A. USE STANDARD PROCEDURE FOR LOADING BINARY TAPES 
is? IF A READ IN DEVICE (PC11 OR ASR-33) IS AVAILABLE. 
131 8. 0 FROM T 
re SHAS SERRE PateMt8° Eke °By roo GP Rc We BBs lee 
134 OCAT WI S 
135 _. es: iar a77R, pet id if "Pld Gor pb meses 
136 BEING USED FOR THE BOOT PR 
138 4, STARTING PROCEDURE 
tas Se HEH HE He HE A HE A SE AE A SE SEE SEE HE HE HE HE HE EE 
141 - A. THERE ARE TWO STARTING ADDRESSES. (1) WITH TELETYPE AND 
ie (2) WITHOUT A TELETYPE. 
144 1. WrTH TELET (OR OTHER TERMINAL). 
14S AAD pbs YpaT THE HE PROGRAM AT ADDRESS ” 
146 PER STARTED THe PROGRAM WILL PRINT THE Se ocRAN 
4 HEADER AND THEN A SERIES OF QUESTIONS ARE ASKED. 
io QUESTION NO.1 “FOREIGN CHARACTER SET (Y OR N)?” 
151 THIS ENABLES THE PROGRAM TO DISPLAY THE FOREIGN 
152 CHARACTER SET IN THE CHARACTER DISPLAY TESTS IF THE 
133 . FOREIGN CHARACTER ROMS ARE PRESENT 
iss o 
ie " QUESTION NO.2 - “NUMBER OF TUBES?” 
138 TYPE IN THE NUMBER OF TUBES ON SYSTEM (1,2,3 OR 4) 
160 QUESTION NO.3 - “ARE DEFAULT ADDRESSES & VECTORS OK (Y OR N}? 
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* 162 IF THE ANSWER TO THIS, QUESTION WAS ai THEN STANDARD 
it abhecSeyeOmnD, AND [WT DEVICE, ROQRESSE® AND. VECTOR 

165 ASSOCIATE THE 1ST ee (175610) WITH THE FIRST TUBE. 

168 DL-175620 WITH THE 2ND TUBE AND SO ON. 

168 - IF QUESTION NO.3 WAS 'N’, THEN THE NEXT QUESTIONS 

8 ort VEE TOR En VIC RESS FOR UNIT X” (WHERE X REPRESENTS 
171 | THE UNIT TOR AND DEY 5 Ee T UP. RESPOND TO THIS 

172 QUESTION BY TYPING THE FK ’VECTOR’ AND ’DEVICE’ 

173 ADDRESS SEPERATED BY A COMMA. 

175 AFTER ALL THE FK ADDRESSES HAVE BEEN SETUP, 

176 THE PROGRAM WILL THEN PRINT 

177 "VT VECTOR R AND DEVI ICE ADDRESS FOR UNIT X" - GNSWER SAME AS 
178 ABOVE 

180 : THE PROGRAM WILL THEN PRINT: 

181 "DL11 VECTOR E FOR R UNIT - WHERE X REPRESENTS THE 

182 UNIT NUMBER SICIATED DL11. RESPONSE 

183 TO THIS BHESTION BY TYPING THE OL11 VECTOR ADDRESS. 
185 QUESTION NO.3 - “TUBE ’0’,’1’,’2’,°3’,OR 4’" 

182 NOMECR GF SHE SUBE TOCBE TESTED (O12 OR” 

189 AND (CR). Ago OBR Opt Fen i Ths 1S fo. ee 

iat AVATLE ie WILL ¢ or line ON oy SELECTED 

192 feat rests vere. AFTER ONE ire oN COMPLETE 

193 A T Xt SEQUENTIAL TUBE WILL AUTOMATICALL’ 
194 BE TESTED. AFTER THE LAST TUBE HAS ’ 

195 THE PROGRAM WILL RE-CYCLE BND AGAIN BE TESTED. 

196 THIS OPTION CaN ALSC BE USED TO RUN EVERY TEST 

197 (1-15) ON EVERY TUBE (REFER TO OSECTION 14.) 

133 QUESTION NO.4 “TYPE TEST NO. TO BE EXECUTED” - RESPOND 
201 BY TYPING THE TEST NO: °O-21’ YOU WISH TO RUN. 

203 2. WITHOUT TELETYPE (OR OTHER TERMINAL) 

205 LOAD AND START PROGRAM AT ADDRESS ’204’. THE PROGRAM 

206 WILL THEN EXE A SERIES OF HALTS, THESE HALTS 

297 ' ENABLE THE USER Fo ANSWER QUESTIONS’ TO THE PROGRAM 

208 VIR, THE E SHITCH REGISTE ER. POP 11705, 11710 

ate eK oNece Hal aca eat ck a HALT 

sf SSScs ot heel 

13 A. HALT AT ADDRESS 001734 (1736) 

215 

216 HALT USED TO ASK YOU IF YOUR VT2O HAS A FOREIGN 

217 CHARACTER SET, IF SO SET THE SWITCH REGISTER EQUAL TO 
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218 A 1 CIF NOT CLEAR THE SWITCH REGISTER) THEN PRESS CONTINUE. 
ge0 B. HALT AT ADDRESS 001746 (1750) 
222 
223 AT THIS HALT ENTER THE OCTAL NUMBER OF TUBES YOU 
224 HAVE (1 THROUGH 4 ) INTO cate SHI SHITCH REGISTER, wehee° IF ou 
ss ates rics oc G ) 5 fo Ys if OTHERWISE LEAVE 
i Rallar ltt SBOP ae TOAD hd! 
229 IF YOU InctcateD Ff USED. °B’, VIA SETTING SWIS=1, 
230 THAT DEFAULT ADDRESSES ARE NOT T 
231 THEN HALTS °C’ THRU 'G’ WILL BE TO PELTED. "THIS 
ee WILL L ENEGLE You TO. TO SELECT YOUR OWN DEVICE, 

J 

4 NOTES” THI R WILL OCCUR SEQUENTIALLY 
es FOR rect che fa tit SO PAY HEED 
237 
e38 ¢. HALT AT ADDRESS 002010 (2012) 
240 
eu ENTER FK VECTOR OF UNIT N INTO THE SWR. 
eu3 D. HALT AT ADDRESS O02022 (2024) 
4S ; 
ee ENTER FK ADDRESS OF UNIT N INTO THE SWR. 
eve %. AT THIS POINT HALTS C AND D REPEATED FOR ALL TUBES. 
250 E. HALT AT ADDRESS O020S0 (2052) 
252 
253 ENTER THE VT VECTOR OF TUBE N - INTO THE SWITCH REGISTER. 
255 F. HALT AT ADDRESS 902062 (2064) 
Bs Sites Nintiry AMY! fg se nce 
o38 ENTER THE YT ADDRESS OF TUBE N INTO THE SWR - 
260 *. HALTS E AND F REPEATED FOR ALL TUBES. 
ebe G. HALT AT ADDRESS 002114 (2116) 
264 
ges ENTER DL11 VECTOR ADDRESS FOR TUBE N INTO SWR. 
267 %. HALT G REPEATED FOR ALL TUBES. 
eb H. HALT AT ADDRESS 002136 (2140) 
270 
271 AT THIS HeLT LE ENTER INTO THE SUR THE OC TAL NUMBER 
272 OF THE TUB! TESTED (0,1,2,3 OR 4). I 


273 OCTAL 4 IS ENTERED IN THE SLR’ ALL UNITS WILL 
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274 BE AUTOMATICALLY ALTERNATED AFTER PASS COMPLETION. 


275 
276 I. HALT AT ADDRESS 002634 (2636) 
278 
2 THIS, HALT IS FOR THE TEST NUMBER TO BE RUN. ENTER 
280 THE R PRESS CONTINUE. 
282 
283 .. RESTART PROCEDURE 
cee RKARFSSKELSH ERA SERSLSRR KERALA ERE 
cee GRAN SHOULD BE RESTARTED ar THE SAME LOCATION THAT IT 
at WOES RAGE TUDE BRAT OIE We TELETYPE IS HETNG USED. STHERUIISE, 
oes uae ee PA TEReTYPE 18 BIN 
291 . 7 CONSOLE SWITCH SETTINGS 
535 ; HRKEPLES AU REKHAKL ELSE ERE RRL KAR ESLER EL LER SEE 
294 A. REFER TO THE INDIVIDUAL TEST DESCRIPTIONS FOR APPLICABLE 
e35 *SWR’ SETTINGS. 
297 7. CONTROL SWITCHES (TELETYPE) 
538 SHEARS SRERS SALA LSA SAA KARAS AEAAARARASAA KA LAHRAALEEAEAES 
oT > TYPING *#¢ HG ( VIA TYPING "CNTR’ & °C’ KEYS SIMULTAEOU SLY) 
ate Fee REET ee BROCRAN TO RETURN TO” THE KEYBOSRO ONES DR” 
204 B. CONTROL <A> 
305 TYPING “18 copra D VIA TYPING THE "CNTRL’ AND ‘A’ KEYS SIMULTANEOUSLY) 
306 AT ANY TIME CAUSES A RESTART OF THE CURREN TEST. BEING R 
207 a. PROGRAM T T TA B DIRECTOR 
208 PSARAS MATRA TAL MALTS RAL S 
310 TEST NAME TEST NO. DESCRIPTION 
312 
313 ocIC 00 ) 
14 VT CHARACTE Ol 10 
315 VT FIELD MODE 02 il 
316 VT CSR PRESET 03 12 
317 VT END OF LINE O4 13 
318 VT END OF SCREEN OS 14 
319 T BLANK CONTROL O06 15 
320 VT ALIGNMENT 07 16 
321 VT FOCUS 10 1? 
322 vr WORST CASE ll i8 
323 T CURSOR CONTROL 12 19 
354 vr 60D ADDRESS 13 Fla 
66 VT RUN-ALL 14 21 
327 ASCII KBD LOGIC 1S 22 
328 ASCII KBD SWITCH & LIGHT 16 23 
325 ASCII KBD CHARACTER SET 17 24 
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ASCII KBD REPEATISILITY 20 es 
VT/KBD SYSTEM TEST él 4) 
VT/KBD SUBTEST SELECTOR e2 27 

EXECUTION TIMES ee 


LOGIC TEST (Q) 


VT 
RERARALALLAA ALARA ALARELEKALE 


TEST DESCRIPTI ON 


THE *VT" LOGIC TEST CONSISTS OF ’28’ SUBTESTS WHICH EXERCISE 
AND DIAGNOSE THE ’VT’ LOGIC. EACH sueTest J IS LOOPED 100’ 
ee TO TEST LOGIC, RELIABILITY. THESE TESTS — ye AS 
A UNIT WHEN THE ’VT’ LOGIC TEST is SELECTED OR MA 
pELECTED INQIVFOURLLY BY THE FK/VT SUBTEST T SELECTOR (REFER | 
Clon ge AT THE END OF EACH SUBTEST THE ’AUDIO BEEP’ 
Is SOU 0 INDICATE A NEW SUBTEST IS BEING EXECUTED. 


LOGIC ERRORS 


THERE ARE TWO ERROR REPORTING SCHEMES USED FOR nc 
*VT’ LOGIC ERRORS, (1) WITH TELETYPE AND (2) WITH 
PROGRAM HALTS. 


1. ON eS 4 ane ay Mae ol oe DOWN ) 
a FAILING T NUMBER as 


Pad Fokus eer Tae A UT of eee OR 
(8) VT’ SHIFT LOGEC ERROR 


(A). NORMAL ERROR FORMAT 


TST NO. PASS MA CSR MAR 
A B C D E 
WHERE : 

Q= B= paeelhe ay TEST NO. 
ON WHICH ERROR — 


. FONE NTS OF CONTROL OL & y abDeE S) ADDRESS REGISTER 
E= CONTENTS OF MAINTENANCE ADDRESS REGISTER# 


OF Tre "60 ADDRESSES. THAT CAN BE READ BACK V1 
THE MAINTENANCE REGISTER 
*SWR’ 2-0 ADDRESS DATA SELECTED 


oc0 COMMAND AND STATUS REGISTER 


) al hae DIAGNOSTIC TEST PROGRAM 


ct 
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C. CONSOLE SWITCH SETTINGS 


= NORMAL RUN [100 PASSES/TEST] 
=1 SUPPRESS SUBTEST ITERATIONS 


=0 CONTINUE SHIFTING ON SHIFT ERROR 
SWl2=1 
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at GiPr' Ree. NEU DATaceVEN Row; 


i IFT REG. PUTPYT DOTOCEVEN ROW > 
101 coat Sis PLL 

110 SHIFT REG. INPUT DATAC(ODD ROW) 
lll SHIFT REG. OUTPUT DATA(ODD ROW) 


(B). SHIFT LOGIC ERROR FORMAT 


TST NO. MA SHIFT IN/OUT EXPT’D  RECV’D 
A 8 d D E ee 

+ FAILING TEST NO 

B= ERR ba GDBRESE MEMORY ADDRESS). 

5: ie vias IN Fac ON WHICH ERROR OCCURRED (1-32). 


B= ier’ rep barat (SHIFTED IN_FROM wal TABLE). 
= RECEIVED DATA (CONTENTS OF 'MAR’) 


ON go iy A LOGIC ERROR (WITH DATA SW1S UP) 
THE PROGRAM ISTERS Ta THE ee 10 _ BEEP AND ORO THE 
INTERNAL REGIS WITH ERROR DATA AND HALT. THESE 
REGISTERS ARE SE OF TWO WAYS: (A) NORMAL 
LOGIC ERROR AND (B) SHIFT LOGIC ERROR. 


(A). NORMAL LOGIC ERROR 


Rls Pace On R HYCH ERROR OCCURRED 


Re GQUENTE Se SOUR RODRESS REG # (REFER ABOVE). 


(B). SHIFT LOGIC ERROR 


ids = Pass On TEST NO. 
neces ERROR OCCURED 


i The e4ib act ote tty APRON fhe Sate pastes wage 
S= ACTUAL CONTENTS OF MALNTENANCE ADDRESS REG. 
FUNCTION 


ABORT SHIFTING ON SHIFT ERROR 
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10. 


A. 


ll. 


SW13=0 _ PRINT ERROR MESSAGES 
SW13=1 INHIBIT ERROR TYPEOUT 
SW14=0 NORMAL RUN 

SW14=1 LOOP ON CURRENT SUBTEST 
SW15=0 CONTINUE ON ERROR 
SW1S=1 HALT ON ERROR 


"CHARACTER SET* TE 


ST (1) 
RLAAAAA LALLA LALA REA LAA KERALA EE LELE LE REAR LEE 


TEST DESCRIPTION 


THIS TEST DIAS re *VT’ CHARACTER SET IN NUMERICAL 

0 R SET IS REPEATED rap tit THE ENTIRE 

SCREEN IS oe LED. ihe Tee T 2" re, S_ DISPLAYING A BLANK 
REATED IT {5 CHAE TEe FOR 


SCREEN. 
SreOMWGTEL] SECO, ARO THN DN NEML CHR, ‘Pine 


Sn THE mar LINE) IS ae bebentied eye E Last T Lhe Ts “END 
TERM NATED WT "Vv PVISIELE EN eee EN ME ENT! 
SCREEN HAS BEEN FILL EST IS a 

NOTE: pene R_SET MAY CONTAIN ACES. THE ARE 
CODES RESERVED H FUTURE SPECIAL T SETTING FAR ACTERS” 
CONSOLE SWITCH SETTINGS FUNCTION 


W11=0 R 

Wil=] INHIBIT DISPLAY DELAY 
SW12=0 NORMAL RUN 

SWle=1 ADVANCE TO NEXT# 

SW14=0 NORMAL RUN 

SW14=1 HOLD ON CURRENT CHARACTER 


*#THIS ADVANCE WILL ONLY TAKE PLACE AFTER THE CURRENT 
TEST HAS BEEN COMPLETED. 


"FIELD CONTRCGL’ TEST (2) 


RKEAKLALASERELLLALELERSLLALELELARALAAARRLAERES 


A. 


TEST DESCRIPTION 
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510 


UIUIUTINGnUn nut 
WOnNMUL WMH 


520 
See 


le. 


13. 


THIS TEST DISPLAYS THE ’VT’ CHARACTER SET USING ALL FIVE 
UOERL Ife. Te Tesy GREMS THE CHARACTER SET. INTO THREE 
Tals Tp ENARLES: The USER TO ViEW EACH CHARAC CHARAC . ee 


B. CONSOLE SWITCH SETTING FUNCTION 


NORMAL RUN 
SW12=1 ADVANCE TO NEXT TEST 


VT *CSR PRESET’ TEST (3) 
i Se Se Me Re gg a Ab a A a EE aE AEA A A ob ah ah a a a aa 


A. TEST D DESCRIPTION 


BOGART SUSIE EG ST PERE BE 





ARE T FUNTION. He “oe & INE. AN IDENTIFYING 
MESSAGE WILL PRECEDE EACH at 
B. CONSOLE SWITCH SETTINGS FUNCTION 
SWiSat ADVANGE 2 NEXT TEST# 
au4=l NALT ON CURRENT PRESET 


VT "END OF LINE®* TEST {4% 
db de dh ge Be dh db ad de a be dk hah 


A. TEST DESCRIPTION 


EL TSS WPS EE ee 
SUH Sell, ee eee psi a 
B. CONSOLE SWI SWITCH SETTINGS FUNCTION 


Sull=0 NORMAL RUN 


¥ 
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5S4 SW11=1 INHIBIT DISPLAY DELAY 

S56 Sil 

$57 SWl2=1 AOVANGE 10 NEXT TEST# 

553 14=0 RUN 

S60 14=] HOLD CURRENT *EOL’ POSITION 


563 © RS Gar NS RAE BS OES ES eS 


$70 14. VT "END OF SCREEN’ TEST (§) 
SLESRAELELLRESSESEEEELEEEESEREPEEREEREESEOEES 


Tee A. TEST DESCRIPTION 


ze / ge oe FHeey cent Pea ins OF 
e CER RCMagr tet 





= oclicll 
8. CONSOLE SWITCH SETTINGS FUNCTION 

587 SW11=0 RUN 

eB SWil=1 TnvielT DISPLAY DELAY 

$0 SW12=0 NORMAL 

a SWl2=1 ADVANCE TO NEXT TEST 

593 1 wer. a < 

Zee aild=l "EOS" POSITION 

5% 

ach 1s. YT “BLANK CONTROL’ TEST (6) 
SHLLSESELSSLALLLARASLLAFELERALELELSSLPRELASLLSR 

599 

£00 

ay A. TEST DESCRIPTION DESCRIPTION 

603 


Peay pacer eh Sree 
= SERED SCH creer OPE Ora DAT Sora 
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16. 


17. 


18. 


WILL START APPEARING ON THE SCREEN. THE TEST WILL RESTART 
AFTER THE ENTIRE SCREEN HAS BEEN FILLED. 


8. CONSOLE SWITCH SETTINGS FUNCTION 





Sill=t INHI 1 DISPLAY DELAY 
Suis=i AOVANGE TO NEXT TEST 
SW14=0 NORMAL RUN 

SWI4=] HOLD CURRENT BLANK POSITION 


vi “ALIGNMENT ’ TEST (7) 
4 A ab gE ab a ah a db a ah 


A. TEST DESCRIPTION 


THIS THIS TEST DISPLAYS 8 FULL SC OF THE CHARACTER “E* To 


B. CONSOLE SWITCH SETTINGS FUNCTION 





SW12=0 NORMAL RUN 

SW12=1 ' @DVANCE TO NEXT TEST 
VT * FOCUS’ TEST (10) 
3 38 46 96 9 a a a a a a a At at 


A. TEST DESCRIPTION 


Hd DEAE A Ptah, Seen OF 8 aga ASTERISKS 


B. CONSOLE SWITCH SETTINGS FUNCTION + 


SW12=0 NORMAL RUN 
SW12=1 ADVANCE TO NEXT TEST 


T "WORST CASE* TEST (1}3 
REAAEREREE EERE EEE EEE EERE EE REE EE EE EEE 


VT YSTEM DIAGNOSTIC TEST PROGRAM 
bates eit 


710 


NINNNNNNNANN 
0 0 0 
WONOUN CW 


ue 
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19. 


20. 


A. TEST DESCRIPTION 


THIS Teer pisreys, A FULL SCREEN OF THE WORST CASE 
CHARACTER PATTERN '125 & 252’. 


NOTE: CODE 12S WILL et A + AND CODE 2S2 WILL DIS- 
PLAY ae ier B pL AIK seek ea S ETING CHARACTER, 
THIS BEING DEPENDENT ON THE ACTE 


B. CONSOLE SWITCH SETTING FUNCTION 


SW12=0 NORMAL RUN 
SWle=1 ADVANCE TO NEXT TEST 


WT * CURSOR CONTROL’ TEST (12) 
JUHI EHH E HEHEHE IIH EEE 


A. TEST DESCRIPTION © 


THIS TEST me THAT THE CURSOR CONTROL CHARACTER CAN BE 
PLACED IN ANY OF 24’ CHARACTER POSITIONS ON THE 
Seren meer 18 a a Oise - Ma e¥Ty aan og 


A Ac SHIR ARBRE gaNE Be HEPES 


OMPLETE THE ENTIRE SCREEN oro? = FILLED WITH ASTERISKS 
AND WITH NO QUESTION MARKS VISI 


B. CONSOLE SWITCH SETTINGS FUNCTION 


SWll= NORMAL RUN 
SWll=1 INHIBIT DISPLAY DELAY 
SWl2=0- NORMAL RUN 
SWl2=1 y ADVANCE TO NEXT# 
atts? NORMAL 
, 14=1 HOLD BN CURRENT CHARACTER 
+ Malt, ROVENES WILL ONLY TAKE PLACE AFTER THE CURRENT TEST HAS 
= COMPLETED. / 


"ODD ADRESS’ TEST (13) 
Tiiittititiiiiticiiiiiiriiiii ris re ott toy 
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A. 


TEST DESCRIPTION 


THIS ba SIMPLY DISPLAYS A mya WHICH IS LOADED 
FROM AN ODD BIER TING POORER: nod pane SHOULD 
SAY: THIS MESSAGE IS BEING LOADE FROM AN ODD 
STARTING ADDRESS. HOW DOES IT LOOK? 


"RUNALL’ TEST (14) 


HLLKRE ALLAAH A RAL AAA AE KALA LALA LAL LRE 


el. 
A. 
22. 
A. 
B. 
C. 


- EXERCISE AND DIAGNOSE THE ’KBD’ 


TEST DESCRIPTION 


THIS TEST ENABLES TESTS ’0-13,15’ TO BE RUN IN ORDER. 
IF A ’4’? WAS SELECTED AS THE TUBE NUMBER THESE TESTS, 
WILL BE RUN SEQUENTIALLY ON ALL AVAILABLE TUBE 


KBD °LOGIC’ TES§f (iS) 


ASCII 
JEM EHE EEE HEHEHE HHHHHEHEHEt 


TEST DESCRIPTION 


THE ‘KBD’ LOGIC TEST CONSISTS OF °19* SUBTESTS WHICH 
LOGIC. EACH qustes! 
IS LOOPED ’100’ TIMES TO TEST LOGIC RELIABILITY 
TESTS ARE RUN AS A UNIT *KBD’ LOGIC TEST 
IS SELECTED BUT THEY MAY ALSO BE SELECTED INDIVIDUALLY 
BY THE ’FK/VT’ SUBTEST SELECTOR ‘REFER TO SECTION 27). 


THE *KBD’ LOGIC TEST DOES *NOT’ CHECKOUT THE LIGHT AND 
SWITCH LOGIC. THIS LOGIC IS CHECKED BY THE ’KBD FUNCTION 
LIGHT & SWITCH TEST’ (SECTION 23). 


RESTRICTIONS 


THE *VT" LOGIC MUST BE OPERATIONAL AS REQUESTS FOR 

*KBD’ KEYBOARD INPUTS ARE REQUESTED BY MESSAGES DISPLAYED 
ON THE ’VT’. CARE SHOULD BE TAKEN THAT ONLY ONE KEY BE 
STRUCK EACH TIME THIS REQUEST IS MADE TO AVOID FALSE 
ERROR INDICATIONS. 


LOGIC ERRORS 


Na Bors” REPORTING MES USED FOR REPORTING 
"Keo" toed R (1) WITH T tf YPE AND (2) WITH PROGRAM 


1. ON ENCOUNTERING A LOGIC ERROR (ALL DATA SWITCHES DOWN) 


RH DIAGNOSTIC TEST PROGRAM 
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CONTENTS OF THE °KED" REGISTERS ARE TYPED OUT. 


A. ERROR FORMAT 


TST NO. PASS MA CSR DATA 
a B c D E 


WHERE : 

A= FAILING be NO. 

B= PASS ON WHICH ita OCCURRED. 

C= SS_ (MEMORY ADDRESS) 

D= CONTENTS OF CONTROL 8&8 STATUS ADDRESS REGISTER 
E= CONTENTS OF DATA ADDRESS REGISTER. 


UP 


ON ENCOUNTERING A LOGIC ERROR (DATA SW ) 
THE PROGRAM WITH 


LOADS THE INTERNAL REGISTER 
THE FOLLOWING ERROR DATA AND HALTS. 


RO= FAILING SUBTEST NO. 
Rl= oe ON WHICH ERROR OCCURRED. 
Re= FAILING ERROR ADDRESS 
3= CONTENTS OF CONTROL & STATUS REGISTER ADDRESS 
4= CONTENTS OF THE DATA ADDRESS REGISTER. 


on 


D. CONSOLE SWITCH SETTINGS FUNCTION 


SW10=0 Re oUt KEYWARD INPUT 

SW10=1 INHIBIT KEYWARD INPUT REQUEST 
SW11=0 NORMAL RUN [100 PASSES/TEST] 
SW11=1 SUPPRESS SUBTEST ITERATIONS 
SW13=0 PRINT ERROR MESSAGES 

SW13=1 SUPPRESS ERROR MESSAGES 
SW14=0 NORMAL RUN 

SW14=1 LOOP ON CURRENT, SUBTEST 
SW15=0 CONTINUE ON ERROR 

SW15=1 HALT ON ERROR 


23. ASCII 


KBD *LIGHT 8&8 SWITCH*’ TEST (16) 


SHRARAAERKSAA EARS ASLAL AAAS RAERAALA SARE SARA ARARALALERASRAHL EAE 
A. TEST DESCRIPTION 


vTap He DIAGNOSTIC TEST PROGRAM 
DBYTAD.P11 


MACY11 27(732) 16-FEB-77 09:54 PAGE 16 


LUFGIELGEE LD PRO RUG T KSEARGHON Gua #0 


Peete es Meare ie We este cha cr 
iPS ita Bate hols Cate 
NTERVOL PRESSED ano” THE iN Tru Fo L_WHICH Morcat S THAT 

A KEY I WILL pe N rere THE LE IME 


THE KEY ee y D DOWN. NO WAY FoR THe - 
BEEN STRUC elise Teter tees dnet= 


NTED EVERY TIME THE SIGNAL I ‘ ae" BTE, THIS 
aac Hae FLAGS - “ee Pele i HELD 6 17 
WILL BE TURNED ON A BOUNTY AAD TURNED 
OFF AT THE E! OF Ane CoUNT CONE curTed MAINS 


Re OWN. 
TO SWITCH TO TESTING THE NEXT TUBE (IF RUNALL IS SELECTED) 
TYPE tC ON THE TUBE BEING TESTED. 


"CHARACTER SET’ TEST (17) 


SCII KB 
SEATS SESE SEE SE AEE EE EE EE EEE EE A EE a Ee 


TEST DESCRIPTION 


THIS TEST IS ALSO AN SeeC TENG INTERVENTION TEST. a ae USED 


TO VERIFY THAT eee RS CAN BE TRANSMIT 

ASCII KEYBOARD RIOR: REQUESTS E CONPL E PASSES 
Ravoh.— B RES I Ae bePcave 7 Oe So gh RT 

Cre Te Be TNPUTED. =H Babs Hus Sr Gran IN eR LEFT 


IND CORNER OF THE PACE AS EACH 
CHARACTER IS TRANSMI TY TED FR FRONT THE NKEYEO OARB IT IS. al 
, AGAINST A CHARACTER BUFFER AND DISPLAYED ON THE ° 


‘nell Joana 


IF THE TRANSMITTED CHARACTER CODE DOESN’T MATCH THE 
EXPECTED CHARACTER CODE THE AUDIO *BEEP* IS SOUNDED AND 
THE RECEIVED CHARACTER IS DISPLAYED IN *BOLD-UNDERLINED’. 


CONSOLE SWITCH SETTINGS FUNCTION 


SW14= NORMAL RUN 

SW14=1 LOOP ON THE CURRENT CHARACTER 
SW1S= LOOP UNTIL cn CODE RECEIVED 
SW1S=1 SKIP BAD CHARACTER 
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DBYT 
890 ’ 
891 NOTE: FOR PROPER OPERATION SW1S SHOULD BE RE-SET TO ’O° 
S3¢ AS SOON AS THE NEXT CHARACTER HAS BEEN INPUTED. 
294 
99s 
896 2s. ASCII KBD ‘REPEATIBILITY’ TEST (20) 
nee KEEL HLLEREKERHLE FLERE LE ERE RAE LEASE SRE RES REREEELEAA RAL LE FEL ERLEE 
899 
900 A. TEST DESCRIPTION 
eee Mei Ninian a, De Re A rege ages 
903 THIS. TEST | Is ALSO. AN OPERATOR INTERVENTION TEST. THE TEST HAS 
ape ¢ ee é 1 TO Tet est” eNYONE. D ECTED MARBCTER CODE HER. (SECOND “ 
906 ae weal fg USED 0 TEST KEYBOARD B GURRACTER BETOEEN BK N ae 
307 a ECTED CHARACTER C 
303 B. STARTING SEQUENCE 
911 
812 THE TEST VERIFIES UP TO TWO CHARACTERS RECEIVED FROM THE KEYBOARD 
9:3 AGAINST THE CHARACTER CODE(S) LOADED BY THE OPERATOR. 
914 THESE CHARACTER CODES ARE LOADED ONE OF TWO WAY, (1) VIA 
315 TELETYPE OR (2) VIA ’SWR’ ON PROGRAM HALTS. 
317 1. TYPE: NNNI,NNN] (CR) (I.E. 101,141 UPPER CASE A AND LOWER A) 
313 WHERE 
320 NNN IS THE CODE(S) TO BE VERIFIED. 
922 2. WHEN TEST IS SELECTED THE PROGRAM WILL HALT. 
933 wei LOAD THE C IB aREtEG'E Boe fo Be VERIFIED IN THE ‘SUR’ 
24 AND “press C0 CONTI NUE m3 “SECOND HALT W L OCCUR. 
926 OAD T seco marae R IN THE 
= 28 Le NEAR EH 
929 C. ERRORS 
sy oe Se teem se. 2 
aus IF THE TRANSMIT ED CHARACTER CO CODE DOESN'T MATCH THE 
XPECTED CH *BEEP’ IS SOUNDED 
934 AND THE RECEIVED CHARACTER IS DISPLAYED IN *BOLD- 
935 UNDERLINED’. 
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938 26. vT20 SYSTEM TEST (21) 
5 SEKKELELRLARARSEKSRE LEAL LA RE LHSREAKE 
941 
a4 A. TEST DESCRIPTION 
5 rte Melee? s.) Soler A oe at oeeneer 2 
gus THIS 17S" IS DESIGNED TO EXERCIS IN A SYSTEM 

5 TYPE OF & o TROWPENT ee nest igh STE ENTIRE 'VT20 
gu? SYSTEM (ALL TUBES) 
Que THE HOST. ¢ ek WHER A ig 11 oR HOS BOpeB THE 
sug ee LED vis EITHER PONE INTERFACE TO THE VT0 
850 HOSTS TONE INTERFACE LINE IS REQUIRED FOR EACH H_UNIT. 
951 THE HOST DIAGNOSTIC ett R MD-11-D2VTE(FOR A POP-1 
952 HOST W/DL11°S), MO-11-DZVTG (FOR A P11 HOST BYDHIL’ S) 
963 OR MD-O8-DIVTB’ (FOR A POP-8 HOST W/KL8J’S) MUST BE LOADED 
954 AND RUNNING BEFORE ATTEMPTING TO TRANSFER DATA VIA THIS TEST. 
4 WHEN TEST 21 IS SELECTED, A MESSAGE REMINDER FOR SETTING UP 
967 THE HOST DIAGNOSTIC WILL "BE DISPLAYED. THIS MESSAGE 
958 WILL THEN MOMENTARILY BE REPLACED WITH & TUBE STATUS 
969 HEADER. IN THIS HEADER WILL BE DI : NO. “OF CHARACTERS 
960 ON THE SCREEN Raat ee RECEIVED: F 
961 HOST, NO. OF BL obks TRANSFERRED AND NO. OF BORORS ENCOUNTERED. 
2 THIS MESSAGE ALSO INDICATES THAT THE TEST IS READY. 
964 AS CHARACT RE FROM THE ASCII KEYBOARD 
3E5 THEY BRE TESTED FOR anes ROP an EON RPKOL CHARACTERS, 
966 AND I BOR eee rEReae DATA AND DISPLAYED.’ THE 
957 BNO em ICL BECEPT UP TO 384 DATA CHARACTERS OR b' 
368 COMPLETE LINES. 
969 a. BATA EREATION 
BA eS Oe RAM ge nee 
673 DATA CAN BE AUTOMATICALLY GENERATED BY TYPING EITHER a. (tA 
675 OR ACY). THE (1A) WILL ENABLE FOR AI NCREMENTAL CHARACTER 
374 SET OF THE C CHARACTERS "40-177" To BE CREATED UNTIL THE 
976 ASE PA ER or een oe eae eR TC tHe WOR REEN 
977 BUFFER IS 
97g C. TRANSMITTING MODES 
es ea 
582 THERE ARE TWO MODES USED TO TRANSMIT DATA TO THE HOST 
983 COMPUTER: SINGLE TRANSFER OR CONTINOUS TRANSFER. 
9c ) Q SINGLE TRANSFER IS INITIATED BY TYP TMODE’ AFTER 
= Phe pe fas 
38 THE DATA ie Br ERED rE AN TR t SRITTED SRE tue vreo 


DIT 


Hi Sal Babine HELE He wee 


OPERATOR cine ara tc’ TC 


a Aye DIAGNOSTIC TEST PROGRAM MACY11 27(732) 16-FEB-77 09:54 PAGE 19 


DBYT 
992 CLEAR THE SCREEN AND RESTART THE TEST OR START A CONTIN- 
333 OUS TRANSFER. 
q A prev TRANSFER I$, INITIATED AFTER THE DATA HAS BEEN 
ag? UO. HANNE ge HR As an ct IN TRANSE ; XC Peet tron By Ihe THE 
99g Bare Back BACK FROR on Te a es ir is auTonar CALC RE- 
999 TRANSMI HE CONTINOUS 
1 RaSrER TEER THE CURRENT NORANSFER. is BEEN TOBNELETED. 
1002 THIS DATA IS SENT IN THE FORMAT OF: 4 NULL CHARACTERS 
1003 (000). A START CODE CHARACTER (377), DATA BTA (ORIGINATED 
1904 BY meeetPY Rie Feae? thor srnncna 
1 On OF *EOP’ (END OF PARAGRAPH) 
108 ; ir WA Saale 5 WiLL TO THE V BATE cepts 5 FORHAT STAR 
1 bg Seamer (377), 1 grrie v20 PepLays A SEP ARROW CTD TC INDICATE 
is ahookies 
101 ACH CHAR RIFI T IS RECEIVE INST 
iBte a Esr0 nea : FRaneat 15, iF A “RECEIVE 
1014 ee OTSPLAYED fe SRT TALD UNDER. 
ibis one HARA TER, ALSO BE RECORDED IN THE BEAOR HEADER. 
1017 ERROR CHECKING CAN BE INHIBITED BY SETTING DATA *SWOO’ 19 
1018 L DATA THEN RECEIVED FROM THE HOST COMPUTER 
1019 WILL SIMPLY BE DISPLAYED. THIS SWITCH SHOULD ONLY 
1920 BE SET T COMPUTER IS ORGINATING DATA USING 
1921 THE SEND RODE (REFER TO THE HOST DIAGNOSTIC). 
1023 THERE IS ALSO ANOTHER OPTION AVAILABLE TO THE USER 
1024 RUNNING WITH MD-11-DZVTG. 
192 8 T. THIS WILL ENABLE THE DATA 
1868 BEN RECEIVED D FROM The Host Wtte BE DISPLAYED IN 
1028 : SO BE EC K TO THE 
10293 Ocere FATS option” I TREN N RUNNING THE Gost VERIFY 
1030 TEST. REFER TO SD-17 -b2vTG G FOR FULL DETAILS OF THE TEST. 
1032 F A TRANSFER IS INITIATED AND FOR ONE REASON oR 8 BNOTHER IT 
1033 Fats 19 Re Yuan “BACK bi We vt vt2o. THE TE T WILL AP 
1034 L BE set A CNTZED. IN THIS 
1035 SOS HON any r) THES Mae CyPE Sor. Wt ESCAPE THE TRANSFER 
1036 MODE AND RESTAR 
1038 ; IF *t€’ IS TYPED IN THE MIDDLE OF A TRANSFER, IT 
1038 WILL CAUSE MULTIPLE RECEIVER ERRORS. 
1041 . C. CONSOLE SWITCH SETTINGS FUNCTION 
i043 ; 
1044 SuiS= ¥CONTINUE TRNANSFERI ON ERROR 
1046 Swid=1 HALT TRANSF ERING ON RROR 
104 Swoo=0 VERIFY RECEIVER 


1047 SWOO0=1 *##INHIBIT VERIFING RECEIVER DATA 
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i048 SWOO & SWO1=1 aie? a mee wee ies IN 
1049 OCTA AND ECHO IT BACK TO 
inet THE Host. 

1981 

4 

1 * SW1S APPLIES TO CONTINOUS TRANSFERS wer AND THE 

i0s4 HALT WILL wae AT THE END OF THE CURRENT TRANSFER. 

10SS #% THIS he MUST BE SET IF THE HOST IS TRANSMITTING 
1056 DATA USING THE SEND MODE. 

10S7 © *%% THIS OPTION SHOULD ONLY BE USED WHEN RUNNING THE 

ie VERIFY TEST OF MD-11-D2VTG. 

inet D. ASCII KRB CONTROL SWITCHES 

1062 

1063 KEY FUNCTION 

1064 ome 8 SO 

1065 : 

1066 RUBOUT DELETE LAST Qe 

#4 ‘ OT 8 a) INITIATE SINGLE T an TER SET. 
ibe tT (CTRL T) pegs TINUOUS TRANS 

1070 ; thi gene TER BATTERN 
1071 tC (CTRL C) ereAR RP SCREEN >aND START 

N76 tE (CTRL E) #ESCAPE AND RESTART 

1074 * USE WITH CAUTION AS NOTED ABOVE. 

1075 E. ERRORS 

11 aie SoA Ree AAG a aan 

1 8 TO INDICATE TRANSMITTER, RECEIVER AND KEYBOARD ERRORS THE 
then FOLLOWING CHARACTERS WILL BE DISPLAYED.QSING THE BLINK MODE. 
1081 CHARACTER MEANING 

183 SIPS ah at 

1084 K on KBD ERROR FLAG SET (OVERRUN ERROR) 
1085 T AL pecever NT ENTE RQUPT 

1086 R ERIE 

1087 0 RECEIVE OVERRUN’ ERRO 

1088 F BCT Hees + PRAM NG’ ERROR 

1089 P Lil R VER 'PARITY’ ERROR 

1090 

1091 

1092 

1093 

1094 

1095 7. YT/KBO SUBTEST SELECTOR (22) 

1036 KELEKARRE LER EREE ERE EEE RELA EERE REE E RAE LRA E EARS 

1098 

1099 A. TEST DESCRIPTION 

EE ai eh ie eee 

1102 THIS TEST IS DESIGNED TO ALLOW THE OPERATOR TO LOOP 

1103 ON ANY SELECTED ‘KBD’ OR ‘YT’ LOGIC SUBTEST WITHOUT 
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RUNNING THE ENTIRE LOGIC TEST 
B. STARTING SEQUENCE 


MS TER ACCEPTS AN OCTAL ADDRESS OF A ae EST. TO BE 
EXECUTED. T OGRAM THEN SETS UP THE PROPER PARAMETERS 
AND EXECUTES THE SELECTED ’SUBTEST’. THE SUBTEST ADORESS 
IS LOADED ONE OF TWO WAYS, (1) VIA TELETYPE OR (2) VIA 
*SWR’ ON PROGRAM HALT. 


1. N SELECTED THE PROGRAM WILL TYPE THE MESSAGE *TEST ADOR.”’. 
THE OPERATOR S 


RAT HOULD THEN TYPE IN THE ‘SCOPE ADDRESS’ OF THE 
TEST TO BE EXECUTED. 


2. WHEN THE TEST IS SELECTED THE PROGRAM WILL HALT. LOAD 
THE Al BRESE OF fue TEST To BE EXECUTED INTO THE 
*SWR’ AND PRESS CONTINUE. 
C. RESTRICTIONS 


POR Siw Neue wr OBB IONE 


DATA “SW11" MUST BE DOWN [0) TO INHIBIT THE PROGRAM FROM 


bb p= bs pe b> bs bo hs bb be = 2 9s be FP 0 oe 


e7 ESCAPING THE SELECTED TEST AND CONTINUING THRU THE LOGIC 
28 TEST. 

ey 

30 D. ERRORS 

oe Be ee ra ot ee cae ee Y ae 

3e 

‘ REFER TO THE RESPECTIVE 'K8D’ OR ‘VT’ ERROR SECTION. 
135 

136 

137 

138 23. EXECUTION TIMES 

ia eerreri rt ttt ttt titi iti i rs oy 

1a TEST PASS TIME NOTES 

143 

144 7.5 MINS 

pac 4 MINS 

146 7A & 

L 30 SECS 


= 
+ 
D 
We eC ee 


N 

& MINS 

N/A & 

TOTAL OF ABOVE + TEST 15 
75 SECS 


ee ee ee ee ee ee ee sh hh bb 0 0 eh Be bh a ho me 


— — — SIU OU OO 
o 
= 
onl 
=z 
wm 


WOnNTMHCW-OwWON 
NOUCWMYeO 


b— 0— b— 0 = bb 


N/A 
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1160 20 N/A 

Hk 2l N/A 

1163 * IN RUN-ALL (TEST 14), THESE RUN FOR 3 SECS EACH. 

L164 

1165 

L166 % 

1167 

Hs 

1170 .TITLE VT20 SYSTEM DIAGNOSTIC TEST PROGRAM 

1171 ; MAINDE -11- abe -D 

1172 :COPYRIGHT 1972, 1976 

re DIGITAL Lodipeent CORP. MAYNARD MASS. 01754 

1178 ;SWITCH REGISTER DEFINITIONS AND FUNCTIONS: 

1177 100000 W1S=100000 ;=1, HALT ON ER ROR 

1178 040000 W14=40000 =1’ LOOP ON CURRENT TEST 

if seat LC Sietine ot att 
1 = guy 

1181 004000 SW11=4000 ssi, Ui bpRecG SEB PR GRAN’ TPRR ATION S 

1182 oo2000 Sw10=2000 =1; INHIBIT ASCII KRB MANUAL INTERVENTION 

1183 001000 SwO9=1000 

1184 900400 Swog=40 

1185 0200 SwO7=200 

1186 060100 SWOb= 

1187 009040 Swos=4 

1188 000020 Swo4=20 

1189 000010 SwO3=10 

1190 900004 Swoe= 

1191 oo0002 SWO1= 

1136 900001 woo= 

1198 ;REGISTER DEFINITIONS 

1196 000 RO=”%0 

1197 000001 R1=%1 

1198 ooo002 Re=%2 

1199 03 R3=%3 

1200 000004 R4=%4 

1201 090005 RS=45 

1202 ooco06 SP=%b 

1203 000007 PC=%7 

a ; INSTRUCTIONS DEFINITIONS 

1207 ococo4 FKCSRY=%4 

1208 090004 VTCSRY=%4 

1209 oo0005 VTMARS=%5 

1210 005726 PoP 1sP=6726 

lell 005746 PUSH1SP=5746 

lele D24b4E PUSH2SP=C4646 

1213 922626 POP2SP=22b26 

1214 090240 NOP=240 

1215 oooe X=2 
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igig ocoode2 Y=2 
i516 sLOAD TRAP CATCHER INTO LOC’S 0-1000 
lel ooc0c0 .=0 
1229 REPT 200 
122} .+2 
1353 
1223 -ENDR 
1224 po0020 220 
1225 000020 i645 ERTRAP SERROR TRAP REPORTER ROUTINE 
1227 00024 16014 PuRF AL ;POWER FAIL HANDLER 
1386 900039 ee enTsev ;ENT TRAP, EMT DISPATCH SERVICE 
is 0003) 174M FKERR STRAP TRAP, LOGIC ERROR TRAP 
le Fs 
1235 000052 20000 20000 
1237 000080 914350 XTTYIN ; TELEPRINTER KEYBOARD ROUTINE 
ts .= 
1538 oooe00 Bors? oo1624 jME OINITTY SPROGRAM STARTING ADDR. IF TTY AVAILABLE. 
1eN0 00204 00137 OO1634 TMP = sNNOTTY :PROGRAM STARTING ADDR. IN 'NO’ TTY. 
le41 000210 000137 Odel36 IMP —sINI TBA :PROGRAM RE-START ADDR. TO SELECT NEW UNIT. 
Les ; TRAP EQUIVALENCE TABLE: 
1 1 RROR=TRAP ;LOGIC TEST ERROR ROUTINE 
= ie pee Suc ere uaea Te 
1 10408 G=EMT+ UBROUT ;? OSAVE *RO-RS’ ON STACK 
150g Towoo4 GE TRECcenTs Lapa er an a far sags 
1B Pipe iRROUT 18 tet bof a "OS 
1253 104007 SETLNE=EMT+7 SUBROUTINE TO SET UP A LINE 18 CHAR.*S 
1 104010 LOL INESENT+10 SUBROUTINE TO LORO A VT’ 
1 104011 =ENT#11 SUBROUTINE TO PRE-LOAD "VT! DATA BUFFER 
1 Logie IN 2 SSUBROUTINE TO PRINT ASCII MESS 
1287 10401 TTYINZEMT+1 ‘SUBROUTINE TO INPUT VIA KEYBOARD 
i 104014 PRTOCTSENT#14 :SUBROUTINE TO PRINT A & DIGIT OCTAL NO. 
1259 1ON015 +15 SUBROUTINE 1 ASGEMLE CHARACTERS INTO OCTAL VALUE 
1261 104017 ISTTKSEENT#I7 ; SUBROUTINE 10 TEST FOR KEYBOARD FLAGS 
es 1o4den DEL marraranrast SUBROUTINE 19 melt co LONG DISPLAY DELAY 
t : THEND=EMT+2 ROUT INE 10 Th RED at E : a MALL PRINTER c por 
ieee tbuns Treno-en $3, SO UBROUTINE 5 ERE ERT ope BCD’ TO BEC IMA 
Ses ; tie See paatekett eres eet ie tte tetera 
127e GUPER OF ENT 1S EXTRACTED AND USED AS OFFSET TO OBTAIN POINTER 
o SELE SUBR 
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; SSRARELALLALLLLL SELLS LLL LLL ASAE LALA EAERLA RARER RALA LALLA LAL AALALE LALA LLL ALES 


901200 .=1200 
mie 11646 EMTSRV: MOV (SP) .=(SP) GET PC FOR TO RETURN 
tShe APSEIE BBoaa Misey | 
5 TST (SP) IS EMT VALID? 
BNE EMTOK 
HALT ; INVALID EMT 
1 EMTOK: ASL (SP) :MULTIPLY EMT ARG BY ’2” 
i paieng rh BOO beTTRG (SP) CLEAR UN 7) ee BIT RNE ADDRESS 
1 3 MOV oF (SP) SC OOROUT INE BHBRE SS 
000136 IMP Hea ; :GO TO SUBROUTINE 
;EMT DISPATCH TABLE 
01 EMTTAB: VTMES "VT? NESSAGE DISPLAY ROUTINE 


at eg oN ON STACK 
a BR ote 
OCTPRT . 


WSRREN FZ = RARE 


ppeseespseee 
RUBE aaNS 
= 


TQ PRINT A TAL _NC 
i BSSEMLE CHBRACT INTO OCTAL VALUE 


REINS 18 LY SAE POE. a 
TO WAIT FOR VERT. 


;SUBROUTINE TO TRANSMIT A WoL SHAR. 
;SUBROUTINE TO CONVERT ’BCD’ TO DECIMAL 


Buea 
Pasa 


oe eee 


XBINDEC 
;REGISTER ADDRESSES 


fi HS 


4 


kU TIEN 2 


° 
ll eel 


om aR 
fof SMe siete BE 


& HIGH BYTE 


pte TAA 
Sih 
$° 


Sara 
BSBB88 SBS88E8 888888 

ééeehe SORES. 

Gas SAS 


5. i : 
;'FK’? UNIT =i REGISTER ADDRESSES. 


Agee He packs 
pea aoe 


ae 
UN 
UN 

Ses 
;ADORESS OF UN 


b= Bs 


bab ee 


ONTROL & *sTatus’ REG. 
TA’ REG. 


T VECT 
TERRUPT LEVEL’ 


igishs ihe 
0-- b= 0 Bo 0 
4 404 bt 
444 444-4 


‘ 
! 


sorte Bi DIAGNOSTIC TEST PROGRAM 


ibis 
8 
£ 


bs 
BSRER 
i 


ee 


ce bees ier ee 


P= bb bo Be 02 Bw B= fo 


BSB8 
Renesas 86 oe 


bo bt Pre hob = pee 


= 


Reese  RESKS 


i 


888883 +$$™8B88888 


er 


RaEERS 


La RERERR RRR S tactical daca tere eee ee tient 


OG 2 bs BR bb FS P= Fe bo be hh GO Ow Bf ff 8 Be BS PP 8 Ph 8 Bs oe ee Pe BBO me 


deg 


Sar 
£mvo 


M02 
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;"FK* UNIT 1°S REGISTER ADDRESSES. 


FKIDAT: 170346 
FK1 NT: 8 


;°FK’ UNIT 2°S REGISTER ADDRESSES 


aj lf 


ae 
FKSLVL: 362 


;"FK’ UNIT 3°S REGISTER ADDRESSES 


FKSLDB: 170370 


is 


;*"VT’ UNIT 0’S REGISTER ADDRESSES. 


viosaR: 170302 
VORA: 


VTOINT: 
VTOLVL: 332 


;*¥T’ UNIT 3°S REGISTER ADDRESSES 
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1364 

1385S OO14S4 1 

33? Bor 
ak 


i 
1389 1464 
1390 OC1466 
2 fa 
as 
ts aie 
1 D01474 1 
ise mise 170336 
LIL) | 
1336 l 900 32¢ 
1 
1 001504 170300 
1400 001506 170302 
14 DO1 19 1 
1402 00151 306 
14 001514 30 
1404 001516 000332 
1405 
1406 
1407 ; 
is hie ees 
ae 
Hig Ohlses 17s 
as 
ae Bee tee 
1414 ats 1756 ° 
1415 1 175642 
1416 1540 
1417 1542 
1Bue 
141 1546 

1420 1550 

1421 1S52 000 

1422 1554 000410 

1423 1556 1 


<= 
BBB BBssesss 
% 
2 
% 


: 
ae 


pmo bee RA fm hh b= 


seseeee 
EERE G3 
ae 


~ 
ye -e ~ 
BSE 

er 


— 
Pe = 

ELS 
roo 
= 
tuo 


MACY11 27(732) 
VT3CAR: 1 

Vistar: | 

VT :] 
VT3INT: 370 
VT3LVL: 372 

F : 

RLBR: { 
FKCSR: 1 
dally 170336 
KLVL: 39 
VTCAR: 170300 
VTSAR: 170302 
VTCSR: pee 
VTMAR: 17 
VTINT: 

TLVL 
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; TEMPORARY STORAGE OF FK ADDRESSES 


; TEMPORARY STORAGE OF VT ADDRESSES 


tt Ree: 63: 
tit REE: SorFER 
11 REC. BUFFER 


;ADDRESS OF UNIT 0’S REC. VECTOR 
;ADDRESS OF UNIT 1’S REC. VECTOR 


¢. 


sADDRESS OF UNIT 0’°S TRANS. CSR 
;ADDRESS OF UNIT 1’S DL11 TRANS. CSR 


SADDRESS OF UNIT 0°S OL11 TRANS. BUFFER 
FADDRESS OF UNIT 1°S DL11 TRANS. SUFFER 


SADDRESS OF UNIT 0°S DL11 TRANS. VECTOR 
ADDRESS OF UNIT 1°S DL11 TRANS. VECTOR 


ee ee 
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hay 001616 O00416 


1443 

444 000370 

144S 000364 

446 000361 

1447 000 

1448 000200 

1449 009012 

1450 000014 

14S1 1031 

14Se2 000 

14S3 000212 

1454 00021 

1455 000231 

14S6 

1457 001620 000000 

1458 O0l6ee 000000 

1489 

1460 

1461 

1462 0000 

1463 000002 

1464 000 

146S 

1466 000010 

1467 000012 

14 Oe O14 

146 O16 

1470 

1471 

1472 

1473 

1474 

1475 

1476 

1477 

1478 001624 012737 900001 
1479 Ot bae 4 

1480 0016. 024154 
1481 001640 012777 000340 
iy Oalbse 613708 024132 
wed Ooles% OodeND 

1485 001656 000240 

1486 001660 000240 

1487 O0166e 000240 

1488 001664 012737 001702 
1489 001672 012701 020000 
490 001676 005 

1491 001700 wane 

48e 001702 162701 002000 
1493 0017068 910137 024140 
1494 001712 012737 000006 
1495 001720 012737 000004 


024154 


177444 


000004 


000004 
000906 
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;DEFINITIONS OF. °VT FIELD CONTROL’ FUNCTIONS 
UNL INE=370 


BOLD=364 
BL 


VISEOS= 


FCSET: 
FCSET1: 


231 


000000 
000000 


; UNDERLINE PRESET 
BOLD PRESET 
BLANK PRESET 


3E SCREEN 

iCLR FIELD CONTROL 
VISIBLE END OF LINE 

VISIBLE END OF PARAGRAPH 

;VISIBLE END OF SCREEN 


;DEFINITIONS OF *MAINTENANCE’ FUNCTIONS ( SELECTED VIA THE ’CSR”} 


CSR=000 
DAR=e 
SRIDE=4 
SRODE=6 
ene i9 


SeI00=13 


y 


;COMMAND & STATUS REG. 

:DATA_ ADDRESS REG. 

:SHIFT REG. INPUT DATA (EVEN) : 
:SHIFT REG. OUTPUT DATA (EVEN) 

; CURSOR. ADDR porees ce 


‘aH | REE AH BNR POR 


(HHH HHH HHH IHE He HIB BIE 


TEST INITIALIZATION ROUTINE. 
:T580° , tHe PROGRAM S SET UP TO_RUN VIA A TELE? MONITOR. IF THE PRO- 
GRAM IS_ STARTED M btaration ao PROGRAM USES PROGRAM ‘HALTS’ 


IF_THE PROGRAM IS STARTED AT LOCATION 


THE 
AND TO REPORT ERRORS. 


;TO COLLECT NEEDED 
UHBHBEHEHBHHEHBHHEHBHBHHHHHG I HHGHIHEEHI GHEE HHEHE HEHEHE Ee at tate 


INITTY: 
NOTTY: 


1$: 


CORSI2: 


MOV 


#1, TTYSWH 
.* 


#340, aPSW 
STACK, SP 


#CORSIZ, 084 
ee 


#2000, R1 
Rl, MEMSIZ 
#6, 084 


#4) dab 


;TTY AVAILABLE, SET SOFTWARE SW 
CLR TTY AVAILABLE SOFTWARE SWITCH. 
INIT STACK POINTER=1000 


; INITIALIZATION SWITCH TEST REMOVED TO ALLOW RE-SELECT 


;RESET TIMEOUT 
;TEST CORE SIZE 


;SAVE LAST 1K FOR ‘VT’ TEST 
;RESET TIMEOUT TO *ERTRAP* 


yre0 Bh DIAGNOSTIC TEST PROGRAM MACY11 27(732) 16-FEB-77 09:54 PAGE 28 
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I 
1496 001726 005737 Oe4154 INITB: TST TTYSWH ;TTY AVAILABLE? 
1497 001732 001106 BNE INITC YES, INIT VIA TTY. . 
1498 001734 an HALT ‘SEE IF FORIEGN CHAR SET EXISTS 
1499 001736 000240 NOP, ;BY EXAMINING THE SWITCH REGISTER 
i800 001740 017737 177360 001620 MOV JSWR,FCSET IF CLEAR THEN NOT FORIEGN 
1501 001746 O00000 HALT :GET # OF TUBES FROM SWITCHES 
1502 001750 900240 NOP 
1503 001752 017737 177346 024136 MOV aSWR,  UNITNO 
1504 001760 042737 177770 024136 BIC #177770, UNITNO 
1505 001766 177332 TST aSWR ;IF BIT 15 IN SWR IS SET T 
1506 001772 100402 BMI 4§ “LET USER INPUT DEVICE ADDRESSES 
1807 001774 000137 002436 IMP INITCB ‘DEFAULT DEVICES & VECTORS REQUESTED 
1509 002000 013700 024136 4g: MOV UNITNO, RO 
1510 002004 012705 001330 MOV #FKOLDB , RS 
1511 O02010 1S: HALT :HALT FOR FK VECTOR 
1512 002012 017737 177306 001500 MOV aSWR, FKINT 
1513 002020 o00240 NOP 
1514 O0e022 o00000 HALT sHALT FOR FK ADDR. 
1515 002024 017704 177274 MOV aSWR, RY 
1516 002030 004737 002700 JSR PC, SETED 
1517 002034 005300 DEC RO 
1518 002036 001364 BNE 1$ 
1520 002040 012705 001410 MOV #VTOCAR, RS 
1521 O02044 013700 024136 MOV UNITNO, RO 
1522 oOO20SO 900000 2S: HALT sHALT FOR VT VECTOR 
1523 O02052 017737 177246 001500 MOV aSWR, FKINT 
1524 002060 o00240 NOP 
1525 HALT ;HALT FOR VT ADDR. 
1526 064 Ol 177234 MOV aSWR, RY 
1527 002070 004737 002700 JSR PC, SETED 
i258 pos07e DOT Se ne 
1530 eae 013700 024136 MOV UNITNO, RO 
1531 002104 O12702 001540 MOV #RINTO, Re 
1532 002110 012705 001600 MOV #XINTO; RS . 
1533 002114 3S: HALT ;HALT FOR DL11 VECTOR 
1534 002116 017703 177202 MOV ISWR,R3 
1535 O02l22 Ol2322 MOV (3)+) (2)4 
1536 O021e4% Ole32e MOV (3)4' (2)4 
1537 002126 012325 MOV (3)+? (5)4 
1538 002130 012325 MOV (3)+; (5)+ 
1539 002132 300 DEC RO 
1540 002134 001367 BNE 3$ 
1541 002136 o00000 INITBA: HALT GET TUBE NO. FROM SWITCHES 
1542 O02140 017737 177160 024134 MOV aSWR, UNI TFG :SAVE TUBE NO. 
1543 002146 000543 BR INITD 
1544 002150 005737 024166 INITC: TST MTRSWH ; TYPE HEADER 
154S 002154 001002 BNE.  .46 "NO, ITS BEEN TYPED 
1546 002156 104012 PRINT 
1547 002160 021027 TITLE :PRINT PROGRAM HEADER 
1548 O0el62e 104012 PRINT :SEE IF FORIEGN CHARACTER SET EXISTS 
1549 O02!64 0214 MFC 
SSO O0e166 104015 ASEMBL 
155i 002170 042703 177776 BIC #177776,R3 


eect a eee DIAGNOSTIC 


002174 
002200 


oF 
Oo 
-_ 
ul 


<88 
Hae 


5 Rees 
sas 


24 
5 3 


TEST PROGRAM 


001620 


024136 
021160 


36 
000260 014750 


6 
000260 014750 


001500 


002700 
014750 


024136 
001540 
001600 
000260 914750 
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INITAC: 
$: M 


es: 


3$: 


4§: 
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R3,FCSET 
REQUEST NO. OF TUBES 
GET INPUT 

R3, UNI TNO 

MESIA -TEXT ’ARE DEFAULT ADDR. & VECT. OK?’ 
WAIT FOR HIS ANSWER 

RarTce IVES UGE DEFEYLT ADDRESSES 

#1 a5 tne +3 TY Ep? 

INtTCB YES, IT SURE WAS 

#F OLDE RS "NO, LET USER DEFINE HIS OWN ADDRESSES 

UNI TNO, RO tWE HAVE ASK HIM FOR ADDRESSES 

#260, MRUNNI 
FIRST GET FK ADDRESS 
:PRINT UNIT NO 

R3,FKINT 

PC, SETED 

MRUNN1 

3 

#VTOCAR, RS :GET VT VECTORS AND ADDRESS 

UNITNO, RO *NUMBER OF TUBES 

#260, MRUNN1 

R3, FKINT 

PC, SETED 

MRUNN1 

RO 

3$ 

UNITNO, RO :ASK FOR DL11 VECTORS 

#RINTO, Re 

#XINTO!RS 

#260, MRUNN1 


;PRINT MESSAGE 


(3)4, (2)+ 
(3)4' (2)4 
(3)4' (5)4 
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1608 002424 012325 MOV (3)+,(S)+ 
1609 OOe426 105237 014750 INCB  MRUNNIL 

1610 002432 005300 DEC 

lel) 002434 001363 BNE u§ 

a 

1613 002436 005737 O24154 INITCB: TST TTYSWH 

1614 OC2e442 001635 BEQ INITBA 

tele ooswue OeLa76 MESS T UNIT NO. 

1eiS Basan PRdare ASERBL ee OBE 1 

ig Geer BO GRIN ooze moro: Rey Rui she SNE T 

te3 Bosues pHeas? HouteM CCR SHAPER’ CUR Swe Si. 

1621 002470 022737 000004 024134 CMP #4, UNITFG 

1622 002476 001004 BNE +12 

1623 002500 005037 024134 CLR UNITFG sYES, SET UP UNIT ’0” 

1624 002504 005237 024164 INC SWAPEM SET SWAP SW. 

1625 002510 004737 016320 JSR PC, STUNIT :SET UP SELECTED UNIT ADDRESSES 

1 002514 005737 024154 TST TTYSWH :TTY AVAILABLE? 

1 14 BEQ TR iNO. 

16 10401 PRINT : TYES 

1629 002524 021263 MES3 “TEX? *TYPE IN TST NO. TO BE EXECUTED’. 
1630 vapeeeaeeatereacaseateneavaseaeeteseaenvesensensavenianentaveatineatel 
1631 :TEST SELECTION ROUTINE. IF NO TTY IS AVAILABLE THE PROGRAM WILL HALT 
1632 “AND WAIT FOR A TEST NO. TO BE LORDED VIA THE SW.’S. IF Y IS 

1633 "AVAIBLE, A REQUEST IS MADE VIA THE PRINTER FOR THE stlecren TEST 
1634 *NUMBER TO BE TYPED IN. 

ie PrererriTertirrititriittitriitiitttittiti iii iiitiiitiitiititeirier iced. 
1637 po000s MONITR: RESET s INITIALIZE ON ENTRY 

1638 poses 104022 NULL ?NULL FOR PRINTER. 

1639 002532 013706 024132 MOV STACK, SP *RESET STACK POINTER 

1640 bea1b4 CLR SWAPEM 

1641 4 024126 CNP #4, PIMP ;DOES HE WANT TO SWAP? 

1642 1006 BNE 1$ 

1643 O0025S2 005037 CLR UNITFG 

16s 002555 005237 Dev 164 INC : EN = 

Les Obesee ee 7 abi7e6 024130 1S: v BIATTB,AVECTR sSET UP 718" RESTART eee 

{Eda Op Sead op4539 ite yep Be’ etRViY eth "VT? INTR ABBE 

1649 002604 012737 O00001 o24166 MOV #1) MTRSWH :SET MONITOR 

16 1 7 1 CLR RUASHH CLR *RUN as SOFTWARE Sil. 

1 yoq ¢LR HOLDSO 

1 4] CLR DONE SW 

1653 002626 005737 024154 TST TTYSWH ;TTY AVAILABLE? 

1654 002632 001004 BNE TTYMTR YES, REQUEST TEST NO. 

1655 002634 0o00000 HALT :GET TEST NO. FROM DATA SW’S 

ee? Sooeae Te al Hl ety SBNECUTE SELECTED TEST 

1658 BOSE NA panes TTYMTR: PRINT , 

i659 0020646 022774 NTRLC 

1660 002650 i04015 ASEMBL sDECODE IT 

1661 O02652 042703 177740 TTYMT1: BIC #177740,R3 :CLR UN-WANTED BITS 

1662 002656 006303 ASL R 

1663 002660 020327 ocooo44 CMP R3, 844 


ne eT DIAGNOSTIC TEST PROGRAM 


1 1 
1675 002720 013725 001500 


1676 002724 062737 000002 001500 


1677 002732 0137eS 001500 
002 


1679 002740 062737 000002 9001500 


1685 002750 003122 
te “4 002752 005166 
1689 002754 O0S226 
1pah 002756 005322 
pe 002760 o0S4S4 
1695 002762 005574 
a4 002764 OO0S6éC 
1699 002766 005740 
1701 002770 O0S7&E 
1703 062772 006014 
170S 002774 O06042 
17 002776 006136 
1703 003000 003016 
1711. 003002 006236 
003004 007416 
003006 007576 
003910 dO10i26 
003012 CiO344 


000 oo ee 
NNNNNANGN 
0+ 0 = 
WoONCMUl cw 
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+6 :TYPE °?* IF NUMBER TO BIG 
aTESTOO(R3) “EXECUTE SELECTED TEST 
; TYPE °?° ON ILLEGAL NO.’S 
MONITR+2 :RE-START 
Ri = (6) SAVE R1 
RY; (S)+ :MOV ADDR TO ADDR. POINTER 
tg 
FKINT, (S)4 ;MOV VECTOR ADDR TO ADDR POINTER 
FKINT. (5)+ 
+, R1 
#2, FKINT 


Ay Ua WOE trite ratsiet eres eet tier re 
TABL 


;’VT20’ TEST 
rere tri titi ttt itiitititti titi iit iti itt itittittititititittttttt tte 


TESTOO: 
TESTOL: 
TESTOe: 
TESTO3: 
TESTOY: 
TESTOS: 
TESTOE: 
TESTO?: 
TEST10: 
TESTII1: 
TEST1e: 
TEST13: 
TESTI4: 
TESTIS: 
TEST16: 
TEST17: 
TEST20: 
TEST21: 


YTLOGIC 
VTCHAR 
VTMOD1 
VTMODe 
VTEOL 
VTEOS 
VTBLANK 
YTAL INE 
VTFOCUS 
VTWORST 
VTCURSR 
YTOOD 
VTRUN 
FKLOGIC 
FKFUN 
FKCHAR 
FKREPT 
SYSTST 


;VT *LOGIC’ TEST 
;VT "CHARACTER DISPLAY’ TEST 
;VT ‘FIELD MODE’ TEST ‘1° 
:VT *CSR PRESET’ TEST 

;VT *END OF LINE’ TEST 

;VT "END OF SCREEN’ TEST 

;VT "BLANK CONTROL’ TEST 

;VT "ALIGNMENT’ TEST 

;VT *FOCUS’ TEST 

;VT "WORST CASE’ TEST 

;VT ‘CURSOR CONTROL’ TEST 
;VT ‘ODD ADDRESS’ TEST. 

;VT "RUN ALL’ TEST 

sFK *LOGIC’ TEST 

;FK *FUNCTION’ TEST 

;FK *CHARACTER’ TEST 

:FK *REPEATIBILITY’ TEST 

;¥T "SYSTEM EXERCISER’ TEST 


pa cea DIAGNOSTIC 


003014 


cae 


5 


Bopioe BBG 
R2NSEn Srole 


BB 


003166 
003172 


014162 


005237 
000137 


104400 


104001 
000095 


TEST PROGRAM 


003026 


125212 


os0000 


ooo002 
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TEST22: TESTX sFK/VT *LOGIC SUBTEST’ SELECTION 


;SHAEHADEEHERESERSESEESERSESERE SEES ERENAYERNERSOSATOREM CEC A 
; SUBROUTINE ENT ERED VIA SELECTING ’VTRUN’. THIS ROUT 

: SOF ENABLES THE VT LOGIC TEST ALL DISPLAY TESTS, AND 

: THE TAeeiI Kk : VBOARD TEST TO iB RUN IN OR . THESE TESTS WILL BE RUN 
:0N BOTH UNITS IF UNI ST) ube SELEC noe 

PER een erermrrrtitr rier eeeen 


VTRUN: INC RUNSWH ;SET SOFTWARE SW. 
JMP TLOGIC TEST. 
Terug 3 11th 


VT20 LOGIC TEST (00) 
1g AHHH HHH HHH SBE HIE HEHEHE ae 


SETUPV: MOV VTCSR, VTCSRY ;LOAD °RY’ WITH THE *CSR’ ADDRESS 
MOV VTMAR , VTMARS *LOAD °RS’ WITH THE *MAINT’ ADOR. REG. 


CLR MESPRT -CLR PRINT INHIBIT SW. 
CLR MESPT1 CLR PRINT INHIBIT SW. 
MOV #100, ICOUNT 
MOV #VTERR, 0834 LOAD THE TRAP 'TRAP’ WITH LOGIC ERROR TRAP 
MOV #VT1, RETURN SET UP "SCOPE’ RETURN ADDRESS 
MOV #340? aPSW : SET PROCESSOR PRIO ORITY TO °?° 
MOV #1, TSTNUM SET UP TEST 
CLR SHE TSW 
CLR SHFPRT 
CLR SCOPEF 
RTS PC 
VTLOGIC: TST TTYSWH ;TTY AVAILABLE? 
BEQ .+10 ;NO 
PRINT 
NESeO ;TEXT *VT20 LOGIC TEST’ 
VTREST: JSR PC, SETUPV INITIALIZE THE LOGIC TEST 


j seoenpus mepuanpneenenneteenasedesertponentanasaaneneenneen nn 


:TEST THAT THE ’CSR’ WAS INITIALIZED CORRECT 
ear a bereeRa Se GEAOEEAEUEEEEEAESSES EO HEEEERERHEHEHEDEHEEASHEREEEEHE 


VTL: NOP s’VT’ TEST 1 
MOV #125212, VTCSRY 
MOV aVTCSRY, RI ;READ CONTENTS. OF THE “CSR 
BIC #50000 0,R1 RET gs * AND "BIT 
BEQ ESET sup "fave CLEARED esr" 


SHOULD = '0 OR 50000’ 


saxeveveseresevseneeeseseverevevavauavasssaveveseenesenensnesseersvenes 


:TEST THAT THE *MAINTENANCE’ REGISTER WAS INITIALIZED T 
2 2 A EE A oa EA AE a a 


VTe: SCOPE ,2 ;’VT° TEST 2 
RESET 


a the DIAGNOSTIC 


DBVTAD.P 


808 
1809 


fecleelceteeleclecleelcelealec) 
bp bb bb 0 
WONOU CWO 


BB 
wre 


be 0 — bo b— b— b= b= & + b= b= bb 0 
fr 
£ 


— 
Moowoond 


003174 
pb3378 

3e0e 
003204 


003350 


014501 


104001 
012714 
104021 


TEST PROGRAM 


osccoc 


oCOo0 
1eSe1 


050000 
l2eS2le 


ooo0d4 
052504 


0S2S04 


ooo090s 
157760 


157760 


os00c0 


000006 
leSeSe 176150 
000010 176146 
1eSeSe 
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MOV JVTMARS, Rl ;READ CONTENTS OF THE *MAR’ 
BIC #50000, Ri TIGNORE ’BIT 12’ AND "BIT 14” 


ERROR sRESET DIDN’T CLR THE 'MAINT’ REG. (EXCEPT BIT °i2" AND 
HEHEHE HBG HEHE B HEHE R HEHEHE BBE HE OBESE 


:TEST FOR WRITING THE ‘CSR’ TO leSele2 
HHBMEHHHBEHAHHBEEHHHHEHHHHEEHHHEHHIHEEIHIIIEIHIHI EEA EE ee 


VT3:  SCOPE,3 jiVTe TEST 3 
MOV #125212, VTCSRY ;WRITE *CSR’ TO *12S212’ 
MOV QVTCSRY,R1 * READ CONTENTS OF THE “CSR 
BIC #50000, R1 ‘IGNORE 'BIT 12’ AND *BIT 14’ 
CMP #125212,R1 
BEQ +4 
ERROR CSR’ SHOULD = ’125212” 


CLR aVTCSRY 


jpuenpesensesnonnsossqecenepednececegasepenserenentea 


;TEST FOR WRITING THE 'CSR’ T 
UIA HLT 


VT4: SCOPE , 4 ;’VT’ TEST 4 
MOV exeaevneY Cor WRITE *CSR’ TO *S2S04’ 
CMP #52504, JVTCSRY 
BEQ +4 ; ##BEWAREX# BIT 6 IS CLEARED ON TYPEOUT 
ERROR ;°CSR’ SHOULD = 'S2S04" 
CLR aVTCSRY WRITE *CSR’ TO °0° 


penseepnonssessosmnenepensneusangeneseoaie ent 


: TEST FOR READING THE 'CSR’ VIA THE ’ G. 
29 3 EG I EE a a 


VTS: SCOPE,5 ; TEST 5 
MOV #157760, JVTCSRY ‘elect "MAINT CSR’ VIA THE ‘CSR’ 


i 
CMP + ree QVTMARS ;MAINT SHOULD= 


*CSR’ 

BEG 44BEWARE#* BIT 6 IS CLEARED ON TYPEOUT 
ERROR iMAINT REG. NOT =°CSR* (157760) 

CLR © @VTCSRY SCLR ‘CSR’ 

MOV  AVTMARS, RI 

ry #50000, Rl 

é Ri ;"MAR’ SHOULD = ’CSR* (0) 

BEQ #4 
ERROR sMAINT REG. NOT="CSR’ (C) 


encnanenunnenseceneren eS mr 


TE THE CURSOR’ ADDRESS REGISTER TO ’ ; 
see Te eTeERNSO REGU MAEOOEEEEESSSA SOE SEEEEEEEEEREMEMARERAAAAERAEEREREES 


VTb:  SCOPE,6 iT TEST 6 
MOV #125252, QvTCAR E REG. TO ALTERNATE 1 
MOV wCAR avicsn BERL. URSOR’ BODRESS bre CSR’ 
CNP lese JVTMARS :READ CURSOR ADDRES *MAINT? 
ERROR :CURSOR ADDRESS SHOULD=125252 


rae BIT” DIAGNOSTIC TEST PROGRAM 


0033S2 
003356 


005077 
005077 


yoyoa 
ra 
a 


176132 
176122 


Ooeses 
Opzses 


es 


000011 
177777 


000010 


Bo000! 


enib 


175750 


176110 
176106 


176050 


176020 
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CLR aVTCSR 
CLR aVTCAR 


j SORURORSERESHOHERESESESORESSINSEERERESETESESE SH seeeesee 
OR’ SS REGISTER TO ' 
ee eer ereeeerrirtreerttti Ter eeritit tterrr iter renee eee 


VT?: Rrore m ;’VT’ Thal of 
MOV #52525, 3VTCAR ;WRITE COMPLIMENT OF PART I 


orp ry CR ons BEART cak¥POCR POORESS VIA ‘CSR’ 


ERROR ;’CAR’ SHOULD=S2S25 
CLR VTCSR 

CLR VTCAR 
jesepsngnsngoueconqnousnonstanvesenatassesgnaenvarenenonnr tts tent 


WRITE THE ’CURSOR’ ADDRESS REGISTER TO '0’ 
RRR TAS 


VT1O: score ’VT’ TEST 10 
Bp El abpREss 
CUR 
TST @VTMARS 
BEQ +4 
ERROR ;CURSOR ADDRESS SHOULD=’0’ 
jauuueucuassvengussssssussssnapassenteatatioee ear 


TEST THAT THE CURSOR ADDRESS’ REG. IS CLEARED VIA : 
a eemrirremrritrierriterrertit ttre tt et trrtit ee eeern rene 


VT11:  SCOPE,11 ‘VT’ TEST 11 
HOV #-1, 3VTCAR ;WRITE ric. =-1 
RESE : ISSUE PRESET’ TO CLR REG. 


T 
MOV #CAR, AVTCSRY ; SELECT 'CAR’ VIA ’CSR’ 
TST OVTMARS TEST IF CAR’ WAS CLEARED 


OR ;RESET DIDN’T CLR ’*CAR’ REG. 
ABBA HEH BJO GHEE EHH EGER GG GEE 


TEST FOR ROTATING A ‘1’ THRU THE ’CAR’. 
2 HE IH I EI A 


vTl2: § OPE, 12 
aby 1,R3 ; LOAD TH YEST TRG. METH ry? 
LOOP12: MOV VTCAR LOAD THE *CAR’ WITH THE TEST REG. 
MOV Rasa aVTCSRY 
CMP R3, av TMARS 
BEQ +4 
ERROR ;°CAR’ SHOULD = CONTAINS OF R3 
CLR aVTCSRY 
CLR QVTCAR 
ROL 3 ROTATE BIT 
B LooPi2 


Tete St Stet dt 5 th $-4-5-$-5-5-Seb tal 4-5-3-4-5-4-4 tal +-+-telal-}-tal-ded-+-5-1-1-4lalelalalebalalbalalalaiale 
;TEST FOR WRITING THE 'STARTING ADDRESS’ REG. TO *1l2eSeSe’ 


VT TEM DIAGNOSTIC TEST PROGRAM 
bevtAb.P1i 

1888 

1890 40 104001 000013 

183) 44 TESS eA 024474 = 175734 
i S2 OQle714 000012 

893 tte leSeSe 175722 
O2e71S leSeSe 


o 
2 
2 


eae er 
ppaeks Phar ce OS25eS 175664 
003624 eer oht 0S2SeS 


Ser ReGRoeS 


OoWnoOnowWwOwow 
bp 2 pe pene pe ps pe pe 
DONOW CWO 


Oose4) ale77? Osww7a | 1756H0 
bo3eve O18714 bogie 
00 ents 175630 


bb bh bb bb 0 = bb b= bb Bb be hb pe = pe ~_ 


SEER ESR SES 


BBseee ter> Bonds 17S606 
1931 003700 012703 oo0001 


1932 003704 012714 0000! 
1933 003710 010377 178878 


g ue 14 
19 BD S738 1044 
1938 002724 006103 
1939 003726 001366 
1940 
1941 
1942 
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EUR ag Lr gn 
VT13: SCOPE,13 ;°VT’ TEST 


MOV av TBUFF QVTSAR oA Leta ¢ RODR. 10 “PREVENT TIMEOUT 
MOV #SAR. aVTCSRY ELECT ’SAR’ TO MA NT A *CSR’ 

MOV Hiocdes, QVTSAR ;WRITE REG. TO ALTERNA M S 
WAITSYNC WAIT FOR VERTICAL ae 

CMP #125252, 2VTHARS 

PER oR ;STARTING ADDR. REG. SHOULD=125252 


sTEGT FOR WRITING THE “STARTING ADDRESS’ REG. T0 'seses’ 


TEST FOR WRITING ING 
HS BHBHE GHEE HHH GHGHHHHIHHGIHHHHHHIH HH GH GHEE IB BHE 


VT14:  SCOPE,14 VT’ TEST 14 
MOV av av TBUFF QUTSAR ; TO PREVENT TIMEOUT 
NOV secede. aVTSAR M 0 MINT art” — 
WAITSYNC itt Eg PPLE’ OE ENC 
CMP ws2525, QVTMARS 


e? 


AR’ SHOULD =S2eSe2S 
a ae A 
G. 


;TEST FOR WRITING THE "STARTING ADDRESS’ R 
1 HBHGHEHEHE HEHEHE HEHEHE HEHE EHH HHH EHH HEHEHE BEE 


VTS: Gy eV TBUFF.aVTSAR hat “apr 1 “PREVENT TIMEOUT 
a ae 
el MAL FOR VERTICAL SYNC. 


ERROR STARTING ADDRESS REG. SHOULD=’0’ 
ere Treen Tree eee er eter er etrrr hit eeeeeee 
; TEST FOR ROTATING A’ 1? THUR THE STARTING ADDRESS REG. 

;NOTE: *R3’ IS USED AS A CHECKING ADDRESS AND WILL CONTAIN THE 
sEXPECTED DATA ON A FAILURE. 
Feerttti tit it ittitiiitititiiirerereierererertirirere pepe re soos se See e 


VT16:  SCOPE,16 ST_16 
FOV avTEFF aVTSAR ;LOAD Legal YT ADDR: 1 BN TIMEOUT 


MOV 1.R3 LOAD THE TEST REG. 
LOOP16: MOV a5 aVTCSRY SELECT "STARTING ADDR.’ REG. 

MOV 3, aVTSAR *LOAD *SAR’ FROM 'R3’ 

WATTSYNC™ :WAIT FOR VERTICAL SYNC. 

cp R3, aVTHARS :CHECK IF REG. LOADED CORRECTLY. 


;°SAR SHOULD = CONTAINS OF 'R3’ 
:ROTATE BIT 
BNE —_LOOP16 ‘LOOP UNTIL CARRY IS SET 
HBB EH HBHEE HEEB HEHEHE GHG HHH EHHE HEHEHE HEB aE beat 
:TEST THAT 'RESET’ WILL CLR THE STARTING ADDRESS’ 
FIT iTi TTT TTT LELL LL LELLL LLL 
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tous eth Tree, ea 175544 sd a it y F.avTSAR- at app VENT TIMEOUT 

1 BRS a3 eae ol2 NOV ay ABUEE reene SELECT act thea S’ REG. 

1947 003746 012777 177777 175532 NOV P 1, SUTSAR € REG 

teu Bosses PBabey RET rSyNc FoR at ic 

1950 003760 012714 oO00012 MOV #SAR, IVTCSRY SELECT THE ’ 

1951 003764 0057 15 ro OVTMARS 

1388 BR3358 ate . : ;RESET DIDN’T CLR ’SAR’ 

ta j HHH HGH HEEB 
1 ;TEST THAT THE ’DAR’ (DATA ADDRESS REG.) IS LOADED FROM ’SAR’ (START ADOR. REG.) 
p24 -  RERLLRARRAAA EE RARLE ERA REESE LL ALARA ARLE EE RRRL EE RELA ELLER ELAR EE RLELE 
1 00 04 ‘_ vT20: SCOPE, 20 ‘VT’ TEST 20 

137 BH S756 493993 ee 176502 ASG #125252, AVTSAR ;LOAD THE 'SAR’ 

ee inote aeat 00 SOY sone VTCSR4Y SELECT MAINT. “DAR Via CSR’ 

taps BB4DTS Bs 715 1 290s CMP ties , JV TMARS 

ieee pos0e8 ete ERROR ’DAR’ WASN’T LOADED FROM 'SAR’ 

1966 004022 O0S5014 CLR aVTCSRY ‘ 

1968 5 RERRERRE RARER EERE REE ELLA LEER ELAR REE E SEER EERE SEES AREER EE ERE EEE EE 
1969 : ISSUE RESET TO CLR TIME-OUT FROM PREVIOUS TEST 

ian BGHEBHEHEHE HEHEHE HHEHHBHEHEHE HEHEHE SHH HHHEHHE HEHEHE HEE 
1972 oOO4024 104001 oD002: VT21:  SCOPE,21 -°VT’ TEST 21 

1973 604030 o00005 RESET P 

1975 seer THAT TE DAR’ (ORTA PDORESS REG ) 16 LORDED FROM SAR’ (START AO 
1976 :TEST THAT THE ’DAR’ (DATA ADDRESS REG.) IS LOADED FROM ‘SAR’ (START ADDR. REG.?} 
ees 5 LERELAEARRRRRE REE E EEE A ALARA REE R EEE RE RARE AERA EE REAERERE RES 
1979 004032 104001 oD002e2 VT22: SCOPE,22 ;°VT’ TEST 22 

1980 004036 012777 OS2S525 175442 MOV #052525, VTSAR ;LOAD THE *SAR 

1981 4044 104021 WAITSYNC WAIT FOR VERTICAL SYNC. 

1 404_ 012714 oo000e MOV #DAR,AVTCSRY —- :SELECT MAINT 

1983 O040S2 022715 OS2S524 CMP wOsese4, JVTMARS 

1984 OO40SE 001401 BEQ 

1386 00406 pag ERROR ;’DAR’ WASN’T LOADED FROM ‘SAR’ 

1987 5 ARAM EEE He EEE HE HEA HEE EEE EE EEE ERE EERE EERE ERE 
1988 ‘ISSUE RESET TO CLR TIME-OUT FROM PREVIOUS TEST 

een GH HGHEHHIH HHI HHH HEHG HEHEHE HHH HHH HEHE iit 
1991 004064 104001 900023 VT23:  SCOPE,23 ;°VT’ TEST 23 

1998 004070 o00005 RESET 

193. j REREREEEESSRELA SEES ERE EEE ESSERE S LEELA RASS EASE E EERE EEE E REEL ER EEE EERE 
1994 ‘TEST FOR ROTATING A ’1’ THUR THE 'DAR’ (DAR IS LOADED FROM THE SAR). 
1336 HAHAH HEHEHE HHH HHH HHH HHH EEE HH HHHHE 
1997 004072 104001 000024 YT24:  SCOPE,24 'VT’ TEST 24 

1998 004076 012703 000002 MOV #2,R3 LOAD THe TEST REG. WITH ‘2° 


1999 004102 010377 175400 LOOPe4: MOV R3, aVTSAR ;LOAD THE ’ 
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2000 004106 104021 WAITSYNC ;WAIT FOR VERTICAL SYNC. 
2001 004110 012714 oo0002 . MOV #DAR,VTCSRY = :SELECT MAINT. ‘DAR’ VIA ’CSR’ 
OO4i14 0315 CMP R3, JVTMARS ‘TEST ’DAR’ 
116 1401 BEQ 44 

2004 004120 104400 ERROR ;’DAR’ WASN’T LOADED FROM ’SAR’ 
2005 OO04le2 O0SO14 CLR aVTCSRY 
2008 124 006103 ROL R3 sROTATE BIT 
200 4126 001365 BNE LOOP24 ‘ROTATE THRU REG. 
2009 EERE LSELELRAEKESHHRS RE RRA RAL SKA KS RS ESSAH KART RHE RELELELE RAL AER AALEL AAS 
2010 - ISSUE RESET TO CLR TIME-OUT FROM PREVIOUS TEST 
snis PITT iti iit iit tt iittiiiitititiiiitittitititiiiitetttetitt es 

13 004130 104 o00025 VT25: ,25 s*VT’ TEST 25 
at Bpaisa  ApdoBE RESET 
= TEST. THAT THE “CURSOR AOOR.’ BIT 1S-SET IN THE "CoR’ JF THE “CAR 
238 THE ’SAR HE ake PapR pop Ach aft 14 CLE STE chR= os 

]  sosurobautvoacceteascarcesdicecdavusssassucteuetabbassnesssseseosssceessess 
2021 004136 104001 000026 VT26: SCOPE, 26 ;°VT? TEST 26 
2022 004142 012777 O20727 175336 MOV #SHF TBF +1, VTSAR LOAD ’SAR’ 
2023 004150 10402) aon aa WAITSYNC ll : WAIT FOR VERTICAL SYNC. 
be Gen Ss SR Es Pela 2 
2027 004170 001001 BNE 
2028 004172 104400 ERROR :°CAR’ BIT IN ‘CSR’ DIDN'T SET W/’CAR’ = ’SAR’ 
2029 004174 032714 o4O000 BIT #49000, aVTCSRY TEST IF BIT14 CLEAR 
ste tee santa BERR sgHOUt D Spr crear 
Sp3e DoNeDd doeots BRRO®  avrcsre 
6p33 j RERRRRRAERERRRRE SELES REEL ERLE LAA LARA AREA AERA LE RE RAE LALLA L ELLA ELE LEE ES 

sTEST, THAT THe CURSOR ADDR.’ BIT IS CLEARED IF THE CAR’ AND ’SAR’ 

spe HB HBHBHEH HEHEHE HEHE HEHEHE HHHHIHE HEH EHHHHHEHE HEHEHE Eat abt 
2038 OO04206 104001 000027 VT27:  SCOPE,27 ;*VT’ TEST 27 
2039 OO04212 012777 O20741 175266 MOV yo tr TBF A13, aVTSAR LOAD SAR’ 
2040 o04220 104021 Ba WAITSYNC te! Pak. sHATT FOR VERTICAL, SYNC. 

ie os80 ; rie ooo Ps is beeps "APR TRAGER (CAR BIT) SET 
soil ARSE Bac uN 

oa MaoTP 004000 175236 BIT #4000, AVTCSR ; SEE Wi ah FH COR So SET MOULD BE 0 Be 
Ait poses note Bae ia. Ee sah uth eth Foe HED BE 14 
2048 004254 O00240 NOP FEN UN 104400 IN THIS 
2049 i NOCATION. IF to Ts 1S 
2050 004256 o0s014 CLR aVTCSRY 

051 Riri taerer etter rere) 

2052 ‘TEST THE ’EOS’ (END OF SCREEN) BIT IS SET IF THE “EOS’ CHAR. IS TRANSFERRED 
5 23 GHB GHHBHHH HG EHEHHBHEHE EHH HHHEHE HEHEHE SEERA kab Ea 


20SS CO4260 104091 000030 VT30:  SCOPE,30 ;*°VT’ TEST 30 
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021024 175214 


000004 
020000 


as 


020402 
026 
430 


000031 

000010 

3544 

14 
Bast 


ES 
a 


3544 020026 
14 024430 


SaaS aD 
8 
8 


fee 
aE 


rururoruoruor forum 
0 
-~SSSVRR2EB 


sk or ,ae 
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MOV #SHFEND, aVTSAR 
WAT TSYNC ite FOR VERTICAL SYNC. 
MOV #SRIDE , JVTCSRY *NPR’ TRANSFER 


;TEST IF BIT 13 (EOS) 
;"E0S’ DIDN’T SET IN ’CSR’ 


IT #20000, aVTCSRY 


OR 
CLR — aVTCSRY 
eer THE SHIFT REG INPUT DATA EVEN’ GETS TRANSPERRED FROM THE DATA B 
:T0 THE MAR’. A SERIES OF °64° SHIFTS ARE DONE AND THE 'MAR’ IS COMPARED 
iT ER ATER EACH SHIFT. 


Q THE DATA BUFF 
5 ESE AE AE SEE AE 9 9 9 9 SE a HE 


VT31: SCOPE, 31 ;°VT’ TEST 31 
nov #10 ICOUNT ;RESET Teenin COUNT TO ’8 
HOV SSRIDE eo SELECT SH SH ENPU DATA EVEN’ 
PC; SHIF fea: 0 TF ORG ’B4’ NPR’ XFER 
input DATA Ee SHIFT ERROR 


BR 
veuvesusntenveusetteneavennesnesueseeneslseunennenueanasusnaesusnuesaenciais 
sa mts POINT °64’ SHIF HE *SHIFT REG. INPUT DATA 


iT ShiF T 4 “OUTPUT Teens 63 HORE, SH Ts Web ORANG oe 


HHHHHHIHHHHHHHIHHHH HHH HHH HHH HEHE HEHE Hii ibe 


Rov eoRODE? ateet ;SELECT *SHIFT are DATA EVEN’ 


PC, INI TSF Ponte Be IFT T 
13 BurrER ¢ po INTER BY '2° 
ee i SHIFT srr oe ORee T on SUPT XFERS 
Sue iy AE UT Dates DATA EVER” SHIFT ERROR 


TAGVB: NOP 
bee Te CHIFT REG INPUT DATA ODD’ GETS TRANSFERRED FROM THE DATA BUFFER: 


; TEST gt reG. INPUT DATA ODD’ GETS TRANSFERRED FROM THE DATA BUFFER 
310 THE on ¥ ik OF *64’ la ARE DONE AND THE *MAR’ IS COMPARED 


;’VT’ TEST 32 


SE 
MOV 
ya Pie me AITIA te per QATA 000 
af ’ ’NPR ’ XFER 
Tae a a roe SHIFT ERROR 
BR TAGVC 
Dg ste err gene nna ang rer eager eager, 


iat ar yuas 2 1*t. 3 rT} neve Meera SHIFT REG. INPUT DAT 
HIS NE Ya A XECUTES ‘ear SHIFTS Svar TOATING THE 
sSeaIeT REG. SUTPU A ODD’ INPUTTED FROM THE PREVIOUS TEST. 
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Tu 
~- 
i 
fw 


iad alalelealalalahalalalehcialalelalalalalelalalelalalalalelelalaieelelaieisielele 
Bpavee Bissas Bede R50es8 HOV ser Soe eri eet ;SELECT "SHIFT OUTPUT DATA ODD’ 


1 Ce GE 
Oove09 Toon geror *” BATA ODD" SHIFT ERROR 


TAGVC: NOP 
Ft tl diet tal t-te seseauvevenenesseesssssaaaneeneeeneangannnaneneneeneaeyesy 
;TEST *NXM’ FOR ING AN INTERRUPT VIA LOADING A RODRESS IN THE ’*SAR’ 
sNOTE: THIS IS THE FIRST TIME THAT THE "INTR. ENABLE “BIT IS SET OR USED. 
SHEE eng ENTIRE ETL FAROE OTTER 


— 
i 
Ww 


furury fururu 


004504 104001 000033 VT33:  SCOPE,33 T 33 
004510 01 000100 o20402 MOV #100, ICOUNT sor hese TES ERATION COUNT TO ’100’ 
bowe 16 0244 CLR SHF TSid sCLR SOF 
01 17 174756 MOV #173000 QVTSAR “LOAD *SAR’ W/ 'NXM’ ADDRESS 
oes 23 016740 TR PC, LOVTV LOAD THE 'VT’ VECTOR ADDRESS 
104021 WAT TSYNC ;WAIT FOR INTERRUPT 
OO4S4C 104021 WAT TSYNC 
42 1044 ERROR SET SEY aft TO °NXM’ ADDR. DIDN’T ERROR 
37 4132 TAGVA: MOV STACK sp SET ST POINTER 
sso 7 16774 JSR C, CLAVTV sRESET OR ADDR. TO HALT 
004554 005714 ; TST avtcsr4 : TEST He onan? e THE ERROR BIT 
Beers (ese Ss 
4 1 OR ;’NXM’ FAILED TO SET ’ERROR’ BIT 
004562 O00005 RESET . , 


be 0 bh 8 8 8 8 8 8 0 8 8 0 0 8 8 0 0 


ESG~ SSBIRREGRABBSVRR POW SasavT8 He 


bab ht tabet tak t-t-t-ht-t lab tet-t aint iab-t-t dal i-th lalla 
>TEST THAT NO INTERRUPT OCCURS WITH PROC. AT PRIORITY 


rorurenoforulru rurururururoruroforrurururururu rururo fururu 


1 

ie 1 HHH HHEEHI HIE HEI IEEE IEEE 
147 OO4S64 104001 000034 VT34: SCOPE, 34 ;°VT? TEST 34 

2148 OG4570 012777 173000 174710 Roy "9179000, @VTSAR 

e149 004576 004737 O16740 JSR DVTVT ;LOAD VT’ INTERRUPT VECTOR 

181 GoMod 012777 49 174500 nov 424 

5182 Qoveie 018700 170000 OV ES 

B163 OO4616 005200 INC RO 

155 408 BR caf 50K’, NO_INTERRUPT OCCURRED 

156 004624 104400 TAGVD: ERROR SINTERRUPTED WITH PROC @ PRIOR 'S° 
187 13706 024132 MOV. STACK, SP 


BONE SE poaoos ee’ 


004634 004737 016774 , oe 
Bee i tb itetstiet 1-11-+-tb 4b tbh tal et-hlabt-ta-ttete-tet-tab-tr t-te lalla 
; TEST THAT NO 'NXM’ ERRORS OCCUR IF THE VT’ IS RUNNING AND THE 


S REG. IS D. 
eivrrererrrertrerrttirttri tt rit i titer rereereeeEe EEG EEG G Lot 


Bess bie7at a ha Rov 10 SET up A LOOP ESUNTER 


Rl 
WSHP TBF +2, RO 


frorururorporurulru ror 
Re eh 


QE SSO we 


rururu 


ee a ee ee 


VT20 He DIAGNOSTIC 
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furururoruruoro 


rororurofurelruPorupororuporurulfulfrurfururulfufururu 
ete Witebetutr bri iteta ff pe rath p-PR iN fers fay 8 


BSBwVRR Lore 


Bry 


Baus 


OO46S4 


00S 
S030 
O32 


012777 


716 
00S00e 


TEST PROGRAM 


020726 174624 


016740 


174602 


024132 
016774 


000036 


003136 


020726 
020726 
020726 
000001 


024430 
174466 


000360 
000040 


174526 


024432 


MACY11 27(732) 16-FEB-77 09:54 PAGE 46 


#SHF TBF , 2VTSAR 
‘arene PC, LDVTVT SIOAD S vt? “ENTERRUBY VECTOR ADDR. 


TAGVE: rR Re 
HE fe oe — THE 


TST (RO)+ 
WAITSYNC wnat FOR VERICAL SYNC 
DEC R1 
BNE TAGVE 
BR .+10 30K NO INTERRUPTS OCCURRED 
TAGVF: ERROR *NXM’ ERROR OCCURRED WHEN SAR’ WAS CHANGED 
MOV STACK, SP 
JSR PC, CLAVTV 


5 RERAERAA ERLE ELLER ELGG RELA EEE ERLE EA ERR EEE R REALE RERA RE ERE RER EES 


:°VT? LOGIC TEST COMPLETE 
Perrtitittititttrttiitirttiitiitiitiittittitiititttitittittttttitiite 


VT36: SCOPE, 36 ;*VT’ TEST 36 
MES7 sTEXT rTEST COMPLETE” 
ENOTST = END OF TEST 
BR VTCHAR ;CONTINUE TO CHARACTER TEST 
IMP VTREST RESTART THE LOGIC TEST. 


JHBHEBHHEBHEHHHHBHEBHHHHHBHHBECHHHHHBE HEHEHE HEEB HH HEB HEHEHE EE Ett 
i wel Oe ie THE ’SAR’, *CAR’ AND SHIFT COUNTER FOR THE 


eertiiittititittiiitiititittititrttiititiiiititietetieretreretiitericy 
INITSF: MOV #SHFTBF,@VTSAR ;LOAD ’STARTING ADDR’ 
MOV #SHF TBF 


WAI TSYNC ;WAIT FOR VERTICAL SYNC. 
MOV SSHF TBF , Re 

CLR ;CLR SHIFT’ COUNTER 
py #1, SHF TSW SET SOFTWARE SW. 






ins EVEN, ETC.) WHICH ts EXECUTED. 
reertitiiritteiit reir t trit i ttt itiit titi tettiitititi titi ie esy 


SHIF ; INCREMENT SOFTWARE SHIFT COUNTER 

MOV SELECT, aVTCSRY ;FORCE "NPR’ TRANSFER 

TST (R3)+ ; UPDATE 2 ARTING ADDRESS BY *2’ 

MOV R3, JVTSAR SET UP TO GET NEXT BUFFER WORD. 

yg  WAITSYNC ;WAIT FOR VERTICAL SYNC. 

MOV (R2)+,R1 ;GET XFER’D WORD FROM DATA BUFFER 

BIC #360,R1 :CLR_ UNWANTED BITS FROM CONTROL WORD 
; SHAP BYTES TO ae ® TO *MAR’ 


SWAB R 
SHFLST: CMP #32. ,RO 1S THIS THE *32° SHIFT 


VT TEM DIAGNOSTIC TEST PROGRAM 
pevteb.Pii 
005036 1010 

bee 2 020031 
3? O0047Se 
012700 000040 
000752 
O2e700 000100 
sca 005066 Qee71S 020031 
e234 iene o20000 


ce 


ee 
BRS 
isin 


2e3S 100 12 
2236 005102 032701 O00400 
2e37 005106 001003 
4 005110 701 000400 
005114 Oe 
gp40 005118 042701 000400 
se OBIE Btls 
2e43 O0051e6 Oee700 000100 
2244 005132 001404 
2e4S 005134 010000 174162 
ee% 005142 001401 
2e47 005144 
2e48 005146 104400 
ec4g gt ae 000040 
ga Bis Burn 
eeSe 005160 062716 000004 
22eS3 005164 000207 
2254 
2ess 
22S6 
2257 
eeS8 
3 
2261 
ecbe 
2e63 005166 012737 005166 d20406 
2264 005174 104000 
ee6S 005176 023204 
sore 005200 104005 neuise 
ee68 005206 01 
sso 10 104004 
le 004737 015170 
e271 O005e16 00240 
st BES ARS 
ee75 
2276 
2277° 
2278 
2279 
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BNE SHF64 CHECK FOR fy SHIFT 
CHP 80031, 2VTMARS j es, END OF SCREEN SHOULD BE SET IN ‘MAR’ 
SHF32: JSR C, INITSF *RE-IN Mor tee so SO uBRe POINTERS FOR '32’ MORE SHIFTS 
MOV #32. .RO *RESET SHIFT COUNTER TO COUNT TO ’64’ 
BR SHIFT :DO 
SHF64: CMP #64. ,RO ‘1S THIS THE L I SHIFT 
BNE TST "NO, COMPARE DATA TO ’MAR’ DIRECTLY 
CMP #20031 , JVTMARS YES *EQS’ SHOULD BE SET 
BEQ EXITSF ;EX 
SHFBAD: BIS #20000, R1 :SET UP *R1’ TO = EXPECTED WORD 
BR REPORT REPORT ERROR 
TSTSHF: BIT #400, Rl | “COMPLIMENT BLANK BIT FOR COMPARE 
+ 
BIS #400,R1 
BR +6 
BIC #400, R1 
CMP R1. aVTMARS :00 S *MAR’ = EXPT’D WORD? 
BEQ SHIFT FORCE NEXT SHIFT 
REPORT: CMP #64. ,RO ite ERROR ON THE LAST SHIFT? 
BEQ <!' gp : YES EX f 
BIT #SW12, aSWR iN "IS SW SET TO CONTINUE SHIFTING? 
RTS PC *RETURN TO SUBTEST AND REPORT ERROR 
ERROR sPRINT ERR OR DATA 
SE pe Sg a 
peo gi ae anfeiit UTETING 
EXITSF: R00 4, (SP) we UP STACK TO SKIP OVER ERROR 
pra mrnezeprrnnnnnennercninnee 


3V DI ST (1) 
Tus TEST DISPLAYS ALL °160’ VT CHARACTERS 
’ SCREEN $s FILLED. EACH CHARACTER IS DISPLAYED NET APPROXI 
THE NEXT C IS D YED. ON EACH 


TE 

Ber ORe AS Finer a a iS TELS END OF 
:DATA *SW14’ MAY BE SET A . 
sSaeeUUSESHAUGESAGGESTEESEETCUSGSSONANEESEALTORSSAEUAEEELaTEOUSESESEIE 


VTCHAR: MOV #VTCHAR, RETURN 
DISPLAY 


MES24 ; TEXT “VT CHARACTER gt esr. 
EOSBUF ;LOAD *VT’ BUFFER WITH "EOS". 
ear ae ;SUBROUTINE SOFTWARE SW. 


DELAY 33 SEC. DELA 

ISR PC, INTCHR ; CREATE 8 bISPLAY NEXT CHAR. 
NOP “NORMAL RETURN TO HERE 

BR ol .-10 ‘END OF LINE RETURNS HERE 
BR VTCHAR _ END OF SCREEN RETURN HERE 


“USTs or 
i THIS TEST DISPLAYS THE ’VT’ CHARACTER SET USING ALL *S* FIELD CONTROL MODES. 
; (NORMAL, BLINK,BOLD,BLANK AND UNDERLINE). THE TEST DISPLAYS CHARACTERS 


en BT DIAGNOSTIC 


See 


012737 
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00S2e26 


024474 
0241 

177775 
005274 


015170 


o24460 
024464 


005322 


002001 
005434 
001001 
005434 


000401 
005434 


004001 
005434 


020406 


024460 
024464 


020406 


174140 


174122 


174104 


174066 
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Reon SEclee UN, G 8, MERE cakaiBt™™ 


er aa tiea ache eater ealeacunsente ns ianseunseaneessansnncens 


VTMOD1: MOV #VTMOD1 , RETURN 
DISPLAY 
MES2S ; TEXT ’VT FIELD CONTROL TEST’ 
EOSBUF “LOAD ’VT’ BUFFER WITH ’VISIBLE EOS’. 
MOV aVTBUFF, KSTOR1 
CLR INTSWH :CLR SOFTWARE SWITCH ; 
MOV #-3, KSTOR3 ;SET UP FOR ’3’ SETS OF CHAR.’S 
ISR PC, VTMD1A *LOAD CHAR. ’S 
THEND 
BR VTMOD1 
BR VTMOD2 :GO TO NEXT TEST IF SW. IS SET | 

VTMD1A: JSR PC, INTCHR ;CREATE AND LOAD CHAR 
BR 4 LOOP UNTIL LINE 1S FULL 
NOP 3 END OF LINE RE TURNS HERE 
SETLNE :SET UP 4’ LINES USING ALL MODES | 
MOV RO, KSTORI i380 VE ST. ADDR. FOR NEXT BUFFERED LINE 
ere vEHOia i GreATE NEXT SET 

trata lla hleeeeebeeeeeeees , H 


:VT_'CSR PRESET’ TES ) 
THIS TEST DISPLAYS THE *VT’ CHARACTER SET IN ALL FIELD CONTROL MODES 
OLD, BLINK st & UNDERLINE). THE FUELS CONTROL IS SELECTED VIA THE 
** BEFORE EACH CHARACTER SET IS DISPLAYED. 
Pirtiiiitiiiiititiitititiitiitttitittttitrittertitetetretettetitterttety, 


: 
;° 


VTMODe: 


VTMD2A: 


MOV 
DISPLAY 
MES26 
EOSBUF 
DISPLAY 
MES39 
MOV 

SR 
DISPLAY 
MES4C 
MOV 


#2001, 2VTCSR 
PC, VTMD2B 


#1004 aVTCSR 
VTMD28 


#401, 9VTCSR 
C, VIMD2B 


JSR 

BiepLay °° 

MESY1 

MOV 

JSR 

DISPLAY 

MESYe 
#4001, 3VTCSR 

JSR PC, VTMD2B 

ENDTST 

BR VTMOD2 

BR VTEOL 


#VTMOD2 , RETURN 


; TEXT *VT* CSR PRESET TEST’. 
;LOAD *VT’ BUFFER W/ ’EOS’. 


; TEXT *BOLD PRESET TEST’ 
; SELECT *BOLD’ PRESET & GO 
LOAD CHAR. °S 


; TEXT *BLINK PRESET TEST’ 
igh hen ha el PRESET 


-TEXT *BLANK PRESET TEST’ 
; SELECT "BLANK* PRESET 
;LOAD CHAR. ’S 


; TEXT ‘UNDERLINE PRESET TEST" 
; SELECT UNDERLINE’ PRESET 
;LOAD CHAR. ’S 


;RE-CYCLE 
:BRANCH TO NEXT TEST IS SW. SET 
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5338 poe iad 2 titi VTMD2B: SAR NTSWH ;CLR SOFTWARE SW. 


440 7 O1S1 C, INTCHR ;CREATE & DISPLAY CHAR. 
2338 OOS444 000240 NOP 
6333 oy 0774 BR --6 ib SEC. Oe UNTIL Fae IF FILLED 
450 104020 DELAYL C. 
e341 O0S4Se 000207 RTS 
sats sepa etemnesesnntiennnetennnesnnen 
e344 ; THIS ey TESTS THAT Me, cap oft LINE’ CHARACTER CAN BE PLACED IN 
ad? : ANY Fak °C rile 1 ae ot THE SCREEN. THIS IS DONE BY 
; STAR ING ALL 16 LINES W th a *VISIBL LINE’ CHARACTER AND 
347 ; THEN INCREMENTING THESE CHARACTERS ACROSS THE SCREEN. 
Ea eiritititititirtitiirtitititittittiticititrettrttittriitirertrereriretieterey 
2350 


O00S4S4 012737 OOS4S4 O20406 VTEOL: MOV #VTEOL, RETURN 
04000 DISPLAY 


53e3 4 ‘ 3 MES? ;TEXT °VT END OF s INE_TEST’ 
385 Oosee Toab0s EOSEUF HLOAD "VI" BUFFER & START 


2354 005470 O0S001 CLR R1 CLR 
2355 005472 112720 op0z12 RESCNT: MOVB = SVISEOL, (RO)+ + TERMINA Ne ON TNE. W EOL’ 
2356 005476 012703 000077 MOV tbs. R3° *SAVE '63° BYTES BEFORE NEXT LINE 
2357 005502 105020 CLRB RO)+ 
2258 005504 005303 DEC Ra 
2359 005506 001375 BNE 4 
2360 51 1 INC Rl s INCREMENT LINE CNTR. 

1 00551 Bo3spt 000021 CMP #17.,R1 :DONE °16’ LINES ? 
2362 OOSSI6 001365 BNE RESCAT *NO, CREATE NEXT LINE 
e363 005520 104004 DELAY ‘DISPLAY THE 1ST 16 LINES OF ’EOL’ 
2365 sAT THIS POINT 16 LINES EACH CONTAINING 1 ’EOL’ AND 63 SPACES HAVE 
2366 :BEEN SET UP IN MEMORY ; THE FOLLOWING SUBROUTINE GOES THRU ONE 
2367 :BY ONE REPLACTNG THE *EOL’ WITH AN °#’ AND MOVING THE ° 
5368 INTO THE NEXT SPACE UNTIL THE ENTIRE. LINE HAS BEEN CHECKED. 
2370 o0ss22 912705 rane oer nov :SET UP FOR °63’ SHIFTS 
5374 ppeess 6155 Tents MOV tie. Fs RO ;RESET BUFFER ADDR. POINTER 
2373 005536 122027 page 12 SHFEOL: CMPB © (RO)+,#VISEOL ;SEARCH BUFFER FOR “EOL” 
537¢ Speeds =P D43G8 AovB ase 

75 44 Il oo00s2 MOVB  #S2,-(RO) sREPLACE ‘EOL’ W/ ’#’ 
srt eee eres cate me anistu,cwose | ‘teve VE ee 
S35_ Gpeeee AMES oO DONE "TG LONES 
2379 O0SS6D 001366 BNE SHFEOL :NO SHIFT gliexT “EOL 
3B Shee ApeS8e BEE RS iBone ig! SHIF g 
2382 OOSS&E 001357 BNE SRHEOL :NO, LOOP AGAIN 
e383 005570 104006 ENDTST 
384 005572 000730 BR VTEOL YES, RESTART TEST 
2385S JUHU REESE SEER oR EB a 
2386 VT ’END OF SCREEN’ TEST (5) 
2387 THIS TEST TESTS THAT THE "UJSIBLE END END OF SCEEEN’ CHARACTER 
5308 BE PLACED IN ALL Ager. ab tne THE TIONS ON THE SCREEN. ie 
2390 OO TEN MARKS. THE ’ *Eoe ne ME BUFEER RueN N INCRERENTED. THAUT THIS 


2391 ;BUFFER REPLACING THE GUESTION MARKS BEHIND THE *EOS’ CHARACTER WITH 


——— 


ia 
DBYT 


BOURA 


2418 


ye DIAGNOSTIC 


005740 
005746 
005750 


oe ee 


0:2737 
00 


912737 
Ape 
Oe34e 


TEST PROGRAM 


005S74 O20406 


Beaty 


000231 
000001 173684 


000056 
002231 


OOS6E0 020406 


oge000 


000001 173574 


0000S2 
000361 


005740 020406 
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;D0TS. 
Weert Iteeririrriceci irr eees rrr rec irr rr rirerr I rererrrrrrrecerr etree ry 
VTEOS: MOV #VTEOS, RETURN 
‘ DISPLAY 


; TEXT ‘VT END OF SCREEN TEST’ 
Te » 7 ;PRE-LOAD THE BUFFER WITH °?’ 


MOV R CNTR. 
MOV £10e4, bo eet Up HP SUFFER POINTER 
MOVB aVISEOS; (RO) * LOAD Ost CHAR. WITH EOS’ 


MOV 1, aVTCSR ST DISPLAY 
SRHEOS: DELAY 
DEC Rl : DONE 
BEQ ENDEOS : YES, ae IT 
MOV S6, (RO)+ :NO, REPLACE THE "EQS? W/ DOT. 


#56. (RO) 
MOVB avVISEOS, (RO) Nove EO OVER °1’ PLACE 
SRHEOS 


ENDEOS: ENDTST 
BR VTEOS ;YES, RESTART TEST 


ian CORO TEST CG) ne een 
sTHIS E StRee N SUFFER OF TST ANK’ CONTROL CHARACTER (361) THRU A 
ar P's. HE SCREEN STARTS BLANK AND END’S 


 PaDTHTASSHEEEGUREAEAEOSEDEEEEOEUEEGEOREOEESEOAOAEETEONSEELIOSNEEEAELEOEA 
VTBLANK : MOV #VTBLANK , RETURN 
DISPLAY 


3h TEXT ‘VT BLANKING’ TEST 
LOAL ; PRELOAD A BUFFER 
-BYTE | 77 tW/ 2°S 
BYTE 77 
MOVB  #BLANK, (RO) SET UP LANK CONTROL CHAR. 
MOV #1024. °R1 ser uP 
MOV #1, aVTCSR D1 splay 
DELAY HES DISPLAY DELAY 
MOVBLK: MOVB } PLACE, *BLANK’ CHAR. W/# 
HOVE HELANC (RO) :MOVE *BLANK’ CHAR. UP ‘1° 
DEC RI ;MOVED *BLANK’ THUR BUFFER 
BNE MOVBLK :NO 
ENDTST 
BR VTBLANK RESTART TEST 


fp cae Maca a cert reer eoriat rere cen itt etitt err ter ice trea er eeeee 
Tagetger DISRave a FULL SCREEN OF THE CHAR. °E’ TO ENABLE A VISUAL 
TPIT ETeririrririririt titi tit it ititiiitiiiititititititiititititerititi tities 
YTALIN: MOV aVTALIN, RETURN 
DISPLAY 


;TEXT "VT* "ALIGNMENT’ TEST 





al SYSTEM DIAGNOSTIC 
OBYTAD.P11 
| ed ae 
Succ l 
e451 te 00S2 
e4S2 005762 104023 
e4S3 
24S4 005764 900765 
e4ss 
24S6 
4S7 
2459 
2460 
1 oos 012737 
1040 
344 
104011 
1 
005277 
ee 
curt 
71 
e472 
73 
474 
2475 
2476 O06014 012737 
77 04000 
i: 3465S 
104011 
2480 006030 125 
nN6D 
pH} ANGH 00s 
e483 006036 104023 
ee 006040 000765 
486 
2487 
88 
8g 
9c 
3s 
2493 
494 O06042 012737 
Fg bo3e 
1 
2497 906054 ede 
Big Goeos? B55 
2500 012701 
2501 O06064 912700 
es 006070 010977 
2503 006074 012710 


TEST PROGRAM 


173526 


00S76& 


173590 


006014 


1734S2 


006942 


002090 
024474 
173410 
00023! 


020406 


B20406 


020406 
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PRELOAD ;PRELOAD 'VT° DATA BUFFER 
ve 105 ;W7 E’S 

.BYT 105 

INC aVTCSR ;ST. DISPLAY 

THEND 


VTALIN 
CUR “preg rare gam eT IR TER OER 


*FOCUS’ TEST (10) 
Tas. Te oIseLers A FULL SCREEN OF ALTERNATE *’S 8 1°S TO ENABLE A VISUAL 


Sere ee eer errr errr TT TT tr rrr re errs 
VFO: OY ae aVTFOCUS, RETURN 
; TEXT "VT FOCUS TEST’ 


PRELOAD ;LOAD 'VT’ DATA BUFFER 
BYTE Se ‘ITH #°S 

INC aVTCSR 7ST. DISPLAY 

THEND 

BR VTFOCUS 


De gs ae ee a 


VT *WORST CASE* TEST 
THIS TEST DISPLAYS A FULL SCREEN OF THE WORST CASE PATTERN *125 3 2Se". 
evererrrrrteririerererriterttrtittiti titi t rete eee ore eee td 


srrmmedae «| aa ea 
; TEXT aie ,WORST CASE TEST’ 


PRELOAD ‘LOAD ‘VT’ BUFFER W/ WORST CASE 
-BvTe 125 ; CHAR 125 
eS ;CHAR. eSe 
CSR :ST. DISPLAY 


BR VTWORS 
serge nnn 
THIS TEST TESTS THAT THE ay on ale eg om PL LEO oe gos" 
PETRI NG INCREMENTE D BS ackOs SCREEN! REEN, i THE CURSOR 1 IS INCREMENTED ALONG 


N THE TEST IS COMPLETE THE 
sENTIRE SCREEN WILL BE FILLED W ue 
ENTIRE SCREEN MILE. CILLEDMLTW 1S. seanesunaeansnasnevannasssnenenen 


YTCURSR : MOV #VTCURSR, RETURN 
CISPLAY 


MES ;TEXT "VT CURSOR MOVEMENT TEST* 
PRELOAD ;PRE-LOAD THE BUFFER WITH ° 
-BYTE 77 
"BYTE 77 
MOV #1024. ,R1 SET UP CHAR. CNTR. 
MOV #VTBUFF RO :SET UP BUFFER POINTER 
MOV RO. AVTCAR LOAD * CURSOR’ ADDRESS RES. 


MOV aViSEOS, (RO) ‘LOAD 1ST CHAR. WITH ‘EOS’ 


04 


¥T20 SYSTEM DIAGNOSTIC TEST PROGRAM MACY11 27(732) 16-FEB-77 09:54 PAGE 46 
OBYTAD.P11 


2504 906190 018777 o00001 173402 MOV #1,aVTCSR :$7 DISPLAY 
1g SHF CUR: DELAY " eal 
$206 B06 vate, FS YES, eile 
2508 114 1272 o00056 NOV ase, Ueo)e iN, RE HE 2608" W/ DOT. _, 
Esti BRP 1 sd staat hagas MOV aries, (RO) : MOVE ae A i PLACE 
Se wae S MODE ENDCUR orst 
e318 ope 136 Aonoes ° a VTCURSR :YES, RESTART TEST 
sels fae ane Mn ey 
e517 ‘Yous Tee ere LY bfepLave A MESSAGE WHICH IS LOADED FROM AN ODD 
sl) Pt mrrererenrrrrrTT TTT rrr ttt tr tr teer 
961 36 0127 e737 00:36 O20406 VTODD: MOV #VTODD, RETURN 
144 105 DISPLAY 
252 0061 46 b22077 ‘ HESIO hive sTEXT T °VT 000 ADDRESS TEST’ 
525¢ poe 124 1 oo Ao33e 173324 MOV one 11, aVTSAR ies Bee A, MESSAGE FROM ODD ADDRESS. 
25, 006162 77 173322 NC avTcsR’ :START & DISPLAY MESSAGE 
S256 Boeise angres BREN vron0 
006172 o0c421 BR FKLOGIC “CONTINUE TO FK LOGIC TEST 
5e20 TTT -irctcki tir sth fiat hh eee 
1 sFKLL FUNCTION KEYBOARD LOGIC TEST (15) 
2532 THIS IS AN OPERATOR INTERVENTION TEST WHICH TESTS THE FUNCTION KEYBOARD LOGIC. 
533 IREQUESTS ARE MADE FROM THE PROGRAM FOR INPUTS FROM THE TION 
Sese SEE ET GG uteentodSiaueuasesstsoneurtenrsesresssosnonee 
536 174 0137 1474 SETUPF: MOV FKCSR.FKCSRY sMOVE 'CSR’ ADDR. TO R4 
$$ ODPsh0 bosos? Beda44 HOY RRSER SCLR PRINT INHIBIT TOF 
Spas Doesi2 OLra? DITINe 000034 HOV ea SO Ee Ran COUNT OLE 
Sean poeske Bistsl BIN feoude MOV i weet iL 08 UP THE RETURN aboRESS PR NSN 
2541 Dob226 012737 000001 d24142 HOV ‘INIT TEST NO. CNTR 
254 
yi 00 FKLOGIC: DISPLAY 
Seqc Boesup de1e40 NESE STEXT *FK LOGIC TEST; 
eeu 006242 004737 006174 JSR PC, SETUPF SINITIALIZE THE *FK’ LOGIC TEST 
2S48 5 -bol led 9-5-5355 deb-bel-ta-tet-t-ivial-iyb-tal-tat-inbb-bet-t-btlel t-te intebntaetotaintab bhai 
2549 SISSUE *RESET’ AND CHECK THAT THE "CONTROL REG. IS INITIALIZED CORRECTLY 
es 13 eg Re 3 2 8 3 EE EE EEE EE a EE a a A a a a a A 
000240 FKT1: NOP sFK TEST °1° 
Seea DoESee | DODD0S RESET 
4 714 TST KCSRY ; RESET D OF CLEARED REGISTER 
Seer 2 aren BEG KTe Faved I CLEARED 
2557 006260 104400 ERROR CSR’ WASN'T OP LEARED VIA * RESET’ 


2esss _cenaieamaaneeaaaiamtmemummmainmeneenneets 


Sarr oes 





TEST PROGRAM 


oo0d0e 
177665 
002000 
100201 


000012 


000003 
177665 
000091 


000012 


000004 
177665 


oo00cs 
176000 
002000 


000012 


000006 
176000 
000001 


° 
° 
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;TEST THAT THE "ERROR’, ‘ASCII FLAG’, & ’GO’ BITS CAN BE WROTE TO °1’ 
erttrrirrtrertrtitt tr eri titi ere eee eee 


FKT2: SCOPE,2 :°FK’ TEST 2 

#177665, BS, aFKCSRY WRITE ALL *CSR’ BITS EXCEPT ’6’ TO 1’S 
af RRO ;CLR_ INTERVAL TIMING BIT 
CHP eat TEST IF BITS ’15,7,0° SET 
RROR BITS '15,780’ FAILED TO WRITE TO 1 IN *CSR’ 
MOV #12, 9FKCSRY :CLR FLAGS 
emt. 
‘TEST THAT THE 'GO’ BIT CAN BE WROTE TO ° 
TE UE OTHE HIRE EE HEHEHE HEHE HEH HEHEHE GHEE IEE EHO EEE H 
FKT3:  SCOPE,3 s"FK’ TEST 3 
BIS #177665, JFKCSRY ITE Al ALL "CSR BITS TO ‘1’ 
CLR aFKCSR4 ‘URI 
BIT #1, 3FKCSRY : TEST If Ro BIT CLEARED | 
BEQ +4 | 


3 Te *GO’ BIT DIDN’T CLR 


MOV #12, dFKCSR4 
Pirie tector tian Co rere reer 
TEST THAT THE ’ERROR’, "ASCII FLAG’ & ’GO’ BITS CAN BE CLEARED VIA *RESET’ 
RAR a RTT TES 


FKT4: SCOPE,4 ;’FK’ TEST 
r #177665, aFKCSRY SURITE BITS TO 1 
ee oc ; TEST IF *RESET’ CLEARED °CSR’ 
ERROR ;RESET FAILED TO CLR ’CSR’ 


SE Ls det S Sah Sh Sahat ael-tatebah abel taba alahadatabateh bi el-taleldlalstntabtabttotatatelale 


‘TEST THAT THE INTERVAL TIMER’ FLAG DOESN’T SET IF *GO’ IS CLEARED 
eee retoomerrrerritietierertetittriririnen 


FKTS: SCOPE,S ;°FK’ TEST S 
MOV #-2000,RO ;SET_UP WA 
INC RO ;WAIT FOR INTERVAL TIMER FLAG 


BNE 
BIT 62900, OFKCSAN 


OR s INTERVAL TIMER FLAG SET W/GO CLEARED. 
MOV #12, 2FKCSRY ;CLR FLAGS 
j auNEHannunnsanpeassasssnerssayesHene act If co ie St 
!TEST THAT THE ‘INTERVAL TIMER’ FLAG WILL SET IF GO IS SET 
Pen eer eer rereMmMrermrrrretriitiert errs trrrr eer ttre 
FKT&:  SCOPE,6 :*FK? TEST 6 
MOY #-2000, RO sgET YP WAIT LOOP 


BIS #1, JFKCSRY 
INC RO’ 
BNE 2 


;SE 
:GIVE FLAG A CHANCE TO SET 


CAS BT DIAGNOSTIC TEST PROGRAM MACY11 27(732) 16-FEB-77 09:S4 PAGE 48 
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2616 006432 032714 002000 BIT #2000, JFKCSRY TEST IF FLAG SET 

17 4 001004 BNE +4 

1 44 i 44 RROR s INTERVAL TIMER FLAG DIDN'T SET W/GO SET 

1 442 012714 000012 MOV #12, 2FKCSRY ‘CLR FLAGS 
spss 5 REAR AGERE ERE L EE ER EH ERE ARERR EERE REE ERR EEE AERA R EEL ER EEE REEL ES 

!TEST THAT THE INTERVAL TIMER FLAG CAN LEARED VIA SETTING BIT 1 
2623 PTittrritiriiiitiiittitit iii titi titiitittittetterieerereretirs lsd 
4 1 900007 FKT?: SCOPE,7 :*FK’ TEST 7 
oped neat 900001 BIS #1, OFKCSRY “SET °GO’ 
2627 O064S6 032714 002000 BIT #2600, aFKCSRY :WAIT FOR FLAG 
5e58 Bheued p4e718 00001 BFe al faFKCSRY CLR *G0" 
2630 006470 OS2714 o00002 BIS #2) IFKCSRY ict INTERVAL TIMER FLAG 
gb3 47 036714 002009 I W200, aFK CSR4 ‘SEE IF FLAG CLEARED 
2633 006502 104400 ERROR SETTING BIT 1’ DIDN’T CLR INTERVAL FLAG. 
2634 veevesearreanareapearenvenveneenneneeneeiiennsatensenssansacoansnioats 
2635 ‘TEST THAT 'RESET’ WILL CLR THE "INTERVAL TIMER’ F 
A] ee arene CELE OEM CEMMAGOSEECEREEOLECESTALEOESANSE;EAAAEASESAAASEAEESE 
O01 0 FKT1O: PE,10 5 EK? TEST 10 
5236 BOEeIG GSert4 | SooDn Byres to. aFxcshy CET Gp) 
2640 006514 032714 o02000 BIT #2000, aF KCSRY :WAIT FOR FLAG 
oe 

A eee? lies ier a Fac WESET 
2643 006524 005714 TST aFKCSRY 'RESET SHOULD OF CLEARED REG. 
2644 526 001401 BEQ +4 
abu 530 104400 ERROR ;*RESET’ DIDN’T CLR INTERVAL FLAG 
2647 | SESSOSESRUSDRURSEESSRONSUNE SCENES Clutare oot INTERNET UTTH PROCESSOR 
abu TEST THAT THE INTERVAL TIMER FLAG CAUSES AN INTERRUPT WITH PROCESSOR PRIORITY a0 
Seg eS eLaREAECoMA SEE SUSEAEEOESASESSASS}EERASSAESENSSEAEAGRAEESISTETEESE 
2651 006532 104001 000011 FKT11: SCOPE,11 s*FK’ TEST 

be 5 012700 76000 MOV #-2000, RO SET Up uP A walt LOOP 

c4 47 16654 JSR PC, LOFKVT SET ’FK’ INTR. ADDR. 

2654 006546 006560 TAGA : INT RRUPT SERVICE ADDR. 
eb55 dob550 005200 INC RO :WAIT FOR INTERRUPT 

SB 006552 001376 BNE - 
2657 006554 104400 ERROR s INTERVAL TIMER FLAG DIDN’T CAUSE INTERRUPT 
Sees DOEcER peoeee BRpasp **" 

5 5 26; TAGA: | POPeSP sRESET THE STACK 
e660 006562 004737 O1E710 JSR PC, CLRFKV CLR *FK’ INTR. ADDR. 
gps 5 RRR EARL EGER AEE ELE EERE EEE EERE EEE EE ELE ER ELAR LE RES 

:TEST THAT ‘NO’ INTERRUPT OCCURRS IF ‘GO’ IS CLE 

ay PITTI TI TTTTTITT TTI LIT LLL LLELLELLELLL LULL Lbbihibbibbihbiiiin 
26 Sb& 104001 opnn1e FKT12: SCOPE,12 s*FK’ TEST 12 
Bae] 572 orz779 006630 172700 MOV #TAGAB, OFKINT ‘SET UP THE INTERRUPT ADDRESS 
2668 006600 12777 000340 172674 HOV ren08. 


iar UP A WAIT 1.007 
1 LR PROC. PRIORITY 
2671 O06616 012714 000100 MOV sr aFKCSR4 :SET INTR. ENABLE 


VT20 SYSTEM DIAGNOSTIC TEST PROGRAM 


DBVTAD.P11 
2672 006622 
aah 006624 
Bers Doeeso 
5978 006632 


5785 
res ares 


016710 


016710 


000 

1760 
0002 
000101 


016710 


000015 
016654 


po8400 


172626 
172622 


172420 


172552 
172546 


172344 
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BR "+6 0K, NO TATERRUET OCCURRED. 
TAGAB: OpesP “RESET 


s INTER RUPT SLURRED W/ ’GO’ CLR 
LRFKV :CLR 'FK’ INTR. ADDR. 

ee 

;TEST THAT ’NO’ INTERRUPT OCCURS WITH PROC. @ PRIORITY '4’ 

TTT iit titiitiiitttttiitiitiititiittiiitiiitiLettLLL ELLE 


FKT13: SCOPE,13 :°FK’ TEST 13 
MOV aTAGB aFKINT SET UP THE INTERRUPT ADDRESS 
HOV 08. 
MOV ;SET UP A WAIT LOOP 
MOV ‘SET PROC. @ PRIORITY 4" 
nov Tat con “SET INTR. ENABLE & GO 
BNE -2 
aon BR ; "+6 e TINTERRUPT OCCURRED. 
; ERRER ibaa PY SccuRReD W/ PROC. 3 PRIORITY °4’ 
JSR LRFKV : "EK? I ADDR. 
-evessaaitteeaqatibcnass Veeesananeessanahitneattealoaaianeosiaseensesss 
:TEST THAT ’NO’ INTERRUPT OCCURRES W/ PROC. Ivy ’S’ 
RGHHBHBHEHEHEHEHEHEHE HEHEHE HEHEHE BENE HH HEHE EHH HE ie 
FKT14: SCOPE,14 ;*FK’ TEST 
MOV #TAGC, IFKINT :SET UP Fue INTERRUPT VECTOR 
MOV #340 KVL 
MOV #-2000,R ;SET UP WAIT LOOP 
MOV #240, JPSW -SET PROC. @ BRIORITY Ss? 
MOV #101, 2FKCSRY SET INTER. ENABLE & GO 
INC RO 
BR > NO INTERRUPT OCCURRED 
TAGC:  POP2SP ‘RESET TACK POINTER 
ERROR *FK INTERRUPTED WITH PROC. 2 PRIORITY ’S’ 
JSR PC, CLRFKV -CLR 'FK’ INTR. ADDR. 
Seer THAT THE INTERVAL TIMER FLAG 1S SET APPROXIMATELY EVERY S00" USE 
?TEST THAT THE INTERVAL TIMER FLAG IS SET APPROXIMATELY EVERY *S0O’ USEC. 
 sbaanseanannsedespnsotabactavabsashauninonanssonensatesecsnneeneenetes 
FKTIS: SCOPE, 15, ;°FK’ TEST 15 
JSR PC, LDFKYT ;SET UP THE INTR. ADDR. 
TAGFA 3 
ne | 
TAGFA: POP2SP ;RESET STACK 
JSR PC CLRFKV :CLR 'FK’ VECTOR ADDR. 
CMP #400,R :CHECK LOW Lin Ir 
PEROR s BRANCH oft K eRe. TO FAST 
ER FKT16 sINTER ON nL gL Ok 


‘T YST’ Y -FEB-77 :54 
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2728 007030 022701 000600 CMP #600, Rt sCHECK HIGH LIMIT 
ue 

ec PuA RR Fre M eta TT tote eRe. To sLow 
731 ccurveresit OS avecnveveveneeneveeveneenst Tee ook ee Reg, TO, SEO, 
? :TEST THAT ’CLR ASCII’ (BIT3) WILL CLEAR THE KEYBOARD FLAG & ERROR BIT. 
es Pe riitiiititit it tiitititit titi ititititt eit ertteteiitterereere tres fy 
2735 007040 104001 000018 FKT16: SCOPE, 16 Sea TE tel il i 

S535 BasRdd Peet fete aPKCSRS Pee That Done has cer 


7. DC 4 RROR IDN’T SET 
ef BD ?bee Ae37 4 000010 re #10, dFKCSRY i Pont LR Prag 
ct nee arohi 100200 BIT #190200, aFKCSRY {TEST IF FLAGS CLEARED 
ae 
Hae 507 rete ERROR ;SETTING BIT 3 DIDN’T CLR ASCII FLAGS 
2745 PT LitLittLtLtLithiaditiattahthteeattetitttbtttdl 
rie : TEST THAT THE KEYBOARD FLAG IS CLEARED WHEN THE KEYBOARD DATA IS READ 
a Prttiritiiritittiitiri tii itt tii iiitti titi iit itt iei ier irti ries ries | 
2749 007072 104001 000017 FKT17: SCOPE,17 ;°FK’ ne 17 
sree 7076 peel 000201 BIS se0h aFKCSRY :SET KEYBOARD FLAG 
751 7102 005777 172370 TST KDATA * READ KEYBOARD DATA 
BO? 1 08 1057 4 ye SFKCSRY :RE-TEST IF FLAG CLEARED 
007110 100001 BPL +4 
2754 007112 104400 ERROR jRERDING KEYBOARD DATA DIDN’T CLR FLAG 
gree 007114 012714 000012 MOV #12, 0FKCSRY :CLR F LAGS 
2757 12 HHH HEHEHE HEE HHI III II Iie 
2758 : TEST THAT THE 'ERROR’ FLAG IS CLEARED WHEN THE KEYBOARD DATA IS READ. 
a Pitti retiiritiitit tii titi itiiittiitititertiiertitie rites tress res 
2761 007120 Aono 000020 FKT20: SCOPE,20 ;’FK’ TEST sO 
e762 0071e% 052714 100001 BIS #100001 , dFKCSRY :SET THE ERROR BIT 
763 0071 005714 TST aFKCSRY : TEST THAT ERROR SET 
764 0071 100401 BMI .t4 
2765 007134 104400 ERROR ;ERROR WASN’T SET 
ots pert, 172334 TST FKDATA : READ THE KEYBOARD DATA 
714 714 TST KCSRY >RE-TEST THE ERROR FLAG 
2768 007144 100001 BPL +4 
2769 007146 104400 ERROR ;READING KEYBOARD DATA DIDN'T CLR 'ERROR’ 
sire D071 posot CLR aFKCSRY ;CLR *GO’ 
771 0071 714 000012 BIS #12, dFKCSRY ;CLR FLAGS 
oA ig ae e 
the 007162 005037 O20402 CLR ICOUNT RUN FOLLOWING TESTS °1° PASS ONLY 
775 sence Se ceneeEtioeo caaannnnnnanneneededaaensdieneesieteenanianeniy 
aa : TEST THAT THE KEYBOARD FLAG CAN BE SET VIA THE KEYBOARD. 
ore Pitti reriitirit tit tii iiti titi iiiitiiitit itt tttteiti rire ir rccs ing 
2779 007166 104001 000021 FKT2l: SCOPE,21 ;°FK*’ TEST 
reo RO? 7s 2777 O02000 172124 Bir eet JSWR fi i Beit. SW. SET? 
781 007 1076 NE 44 ;YES, TEST COMPL 
e782 007202 012737 007210 Oe20406 MOV #TAGFH, RETURN Re-Ser § SCOPE ADDRESS 


2783 007210 052714 o00001 TAGFH: BIS #1, JFKCSRY ;S 


VT20 SYSTEM DIAGNOSTIC TEST PROGRAM 
bavtab.Pil 


2784 007214 104000 
021506 


FO Bie Ws ee 


1 
7e4e 105714 


4 
die7i4 000012 


‘Wes ips0g0 000022 
007, 4 
507, 1 


e805 007264 005077 172220 
e507 DO 7a 177773 
007274 1 
007276 1 
2803 007 001376 
si0 Bae piace 
at 
sets 007 rat 
sii urate aaah 
sete Hetty 12714 000012 
2816 
2817 
519 
e8e0 007320 104001 000023 
el bor 80 012714 o00201 
007 Ly 
5 007 1 So 
Bizra0 19934 


wee 
peas 


S 
13 
ae 100401 


2831 

os 8 

ae Wa tai 

Sac 14 000012 
ease 


& 
De 
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DISPLAY 
MES6 ;REQUEST CHAR. 
C * ave R CLEAR MESSAGE 
TAGH: CLR Ri 
INC Rl 
BNE” Ane 
BNE TRGH 
TSTB — ;TEST IF KEYBOARD FLAG SET 
ERROR ;KEYBOARD FLAG DIDN’T SET 
MOV #12, dFKCSRY ;CLR FLAGS 


sPenseessqeesaspessespenonetucnnncessensepececnstessesenesenees: ‘He REE 
; TES THE ’ASCII’ FLAG ISN’T SET IF ’GO’ IS CLEARE 
536 SESE RE SE 9 9 9 9 9 9 9 9 9 9 9 9 9 9 


FKT2e: Bee ay ;’FK’ TEST ee 


;REQUEST CHAR. 
CLR aVTCSR :CLEAR MESSAGE 
MOV a5, RO 
TAGAH: CLR R 
NC RIL. 
BNE -2 
INC 0. 


TAGAH 
fst aFKCSRY ;TEST IF KEYBOARD FLAG SET 
ERROR va Sines ASCII FLAG SET W/ 'GO’ CLEARED 

evveneaneaveneedeedbentanenneaveneapeenbuneaneantanepceneapearennentes 


T THAT THE ‘ERROR’ FLAG IS SET IF THE KEYBOARD FLAG ISN’T CLEARED 
s LSSAAESAEAESEAEDOSSAEEUSSNEPADSEAEEEES EASE EESESSENEEEAESSAEALE EGS TOES 


FKT23: SCOPE,23 3" EK? TEST 23 
Oe ay pea #201, OFKCSRY ; SET ’GO’ 
MESeB ;REQUEST CHAR. 
cr aVTCSR ;CLEAR MESSAGE 
V #-5,RO 
TAGI: CLR Rl 
INC R1 
BNE 
INC RO 
BNE TAGI 
ey oyeen ;TEST IF ERROR SET’ 
OR ERROR A ial SET ON 2ND CHAR. 
gta aio SEK CLR 
+) #12, dFKCSRY LR FL Ss 


rik 1+ lle 
K’ 
FT TITTT TIT TTT tT TTT TTI LILiLiLLL LLL LE LLL LLL LLL 


nr a ne eee ee ee ee eee 


BS 
33 
Bu 


ECC ROeURURRUTMseaaAsaese 


He DIAGNOSTIC 


a 


104001 


0074S0 


TEST PROGRAM 


003122 
006236 


007416 d20406 


016654 


372016 
000003 172010 
001000 


171766 
024436 
024436 
171742 
024436 
024436 
Mi 
000012 171712 
000012 171702 
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FKT2e4: SCOPE,24 
pLAY 


ENDTST 
+6 
Sete 


;°FK’ TEST 24 
; TEXT ee OK; 
;END OF TEST 


;RESTART THE *VT’ LOGIC TEST 
*RE-RUN ’FK’ LOGIC TEST 


FKL 
jeuceeaebaneenenuuseanieaeenaeeapeeneeanhcatunacauesaeeaneriinananaaees 


ET TIRE Re tlent EY Gils Uta ne ection wv 


LIGHT 


i 5 i FT Y IS STRUCK A SECOND TIRE THE CORRESPONDING FUNCTION 
2836 EGE A a a aE a a 


FKFUN: MOV #FKFUN, RETURN 
D AY 


;TEXT *FK FUNCTION KEYBOARD LIGHT TEST’ 
CLR WORKINGS REG’S 


;LOAD THE INTR. ADDR. 
sINTR SERVICE oie 
;WAIT FOR INTERRUPT 


;ROUTINE TO *SERVICE’ FUNCTION KEYBOARD INTERRUPTS 


SRRVFK: ING BPR 
BPL«Ssé«ASS 
CHE 43, JEKDATA 
1s: CMP sloop‘ Re 


eae 
MOV RO, SAVOLD 
RY, RO 


BIC 

BIC SAVOLD, R4 
RVFOB: 4h FKLOB, RY 
SRVFOB: OY BT TPG 


MOV R1, SAVOLD 
ete ae RY 


et a SFKCSR 
EXITF1: sf #12, aFKCSR 
ENDTST 
FKFUN 


jINTR. CNTR. EVERY 1000, LITE DATA UPDATED) 


;CONTROL C_TYPED? 
IF SO-EXITF1 
1 sain *S12’ FLAGS? 


isa Soe BITS IN ‘OLD’ NO 
‘CLR ALL CORRESPONDING BITS IN ‘NEW’ 
‘SET REMAINING BITS. FOR *NEW? V 


ie aH BReSent? 


‘oe ALL, EOre SPONDING ai IN Re RD. 


Yiesny bis Hed Ge 
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| UHHH HHH HHH HHH HHH HHH He 


97 KE CHARACTER TEST (17) 
e658 ile t et ag CHARACTERS CAN BE aR VIA THE FKAL jSEYBORRO. 
e500 te opel GR ey Tenet te Poste fhe Wt ne etaaeRS 
302 ? KEYBOARD We PACH pass. Cone TER TRANGATTTED oF Ron fae’ IS VERIFIED 

AGAINST ef CHARACTER ra ISPLA Me yee role ATH, YRANGATTTED 
Sgo¢ + END THE CHERAC TER BIg THe BPEL Bien IP CHARACTERS RECEIVED 
2906 ! “FROM THIS POINT ON rie LL BE TRANSMITTED I S MODE UNTIL EITHER THE CORRECT 
2907 *CHARACTER CODE IS RECEIVED OR DATA EMIS” Ie! TO A ’1’ ALLOWING THE PROGRAM 
2908 :T0_ CONTINUE DA he Y ALSO BE SET TO A ’1’ AT ANYTIME TO LOOP ON 
gg £7 COR TR canstacanonamntinauntanaioeanes 
2912 007576 0:2737 007576 O20406 FKCHAR: MOV #FKCHAR, RETURN 
2913 007604 104000 DISPLAY 
gai 021312 MES ;TEXT *FK CHARACTER TEST’ 

15 007610 012701 020463 MOV #CHRTAB-1,R1 T UP CHAR. TABLE POINTER 
2916 007614 005037 924144 CLR FIELDSW fcrR FIELD CONTROL SOFTWARE SW. 

2917 007620 005037 de4v44O CLR TEMP] :SET UP SOFTWARE SW.’S 
2918 007624 005037 do444e CLR TEMP2 
2319 007630 O05: 024460 CLR KSTORI 
2920 007634 004737 O166S54 JSR PC, LOFKVT ;LOAD *FK’ VECTOR ADDR. 
eel 0076 OO7BHE CHKFKO 

00764, 001 ;WAIT FOR ’FK’ INTERRUPTS 
2923 007644 000776 .-2 
2925 ;ENTERED HERE ON *FK’ INTERRUPTS 
5358 46 105777 171622 CHKFKO: TSTB aFKCSR sASCII FLAG SET? 
2928 0076S2 . 100071 BPL EXTCHR INTERVAL TIMER FLAG 
2929 007654 117702 171616 MOVB § aFKDATA, Re READ & SAVE DATA 
2930 007660 032777 O40000 171436 BIT #SW14, aSWR *IS THE LOOP SW. SET? 
2931 007666 001007 BNE CHKFKI+2 YES, DON’T UPDATE POINTER 
2932 007670 005737 024144 TST FIELDSW NO, IS T ROR FLAG SET? 
2933 007674 001403 BEQ CHKFK1 ?NO TE POINTER 
2934 007676 005777 171422 TST aSWR “YES, IS SCOPE SW. SET? 
2935 007702 100001 BPL CHKFK1+2 *YES, LOOP ON CURRENT CHAR. 
6336 105721 CHKFK1: TSTB = (R1)4 NO, UPDATE POINTER 

120211 CMPB ss R2, (R11) *DOES RECV’D CHAR. =EXPT’D CHAR. 
2938 007710 001073 BNE CHRERR =NO CHAR. 
2939 007712 005737 024144 TST FIELDSW *1S FIELD SW. SET? 
e340 16 601404 BEQ CHKFK2 : 
1 20 005037 024144 CLR FIELDSW YES, CLR IT 

Me 007724 112720 000360 MOVB #360, (RO)+ “CLR FIELD CONTROL CHAR. 
2943 007730 022702 000033 CHKFK2: CMP #33,Re 
2944 001403 BEQ +10 
294S 007736 005737 o24460 ts? KSTOR! ; DOING CONTROL pass? 
53y9 OOo Nee 000100 BIS i180, Re YES, ADD DBT? SO CHAR. IS VISIBLE 
2948 007750 110220 MOVB Re, (RO)+ MoV" RECV’D CHAR. TO ‘VT’ BUFFER. 
2949 007752 005737 o24440 TST TEMP 1 
2950 007756 O01012 BNE CHKFK4 
2951 007760 022701 oss: CMP #UPCASE-1,R1  ;STARTING "UPPER CASE’ PASS? 
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007764 001007 BNE CHKFK4Y ;NO 
00 494009 DISPLAY F . 
30 MES2 TEXT “INPUT UPPER CASE 
007772 012737 007576 024130 MOV #FKCHAR,AVECTR :RE-SET 'tA’ RESTART ADOR. 
010000 024440 INC TEMP :SET PRINT INHIBIT SW. 
010004 oe444e CHKFK4: TST TEMP2 
610019 0010 2 BNE EXTCHR 
01001 2701 020637 CMP #CONTRL-1,R1 | ;STARTING CONTROL PASS? 
010016 001007 EXTCHR : NO 
g109e9 104000 DISPLAY 
1 3143 MES23 ;TEXT “INPUT CONROL CHAR. S” 
010024 012737 007576 024130 MOV #FKCHAR,AVECTR ;RE-SET 'tA’ RESTART ADDR. 
019032 o24442 INC TEMPe SET DISPLAY INHIBIT SW. 
1 1 020653 EXTCHR: CMP SCNTRIT,R1 *STARTING CONTROL PASS 
010042 001002 BNE +6 :NO CONTINUE 
010044 005237 o24460 INC KSTORI YES, SET UP TO DISPLAY INVISIBLE CHAR. 
010050 oooo02 171416 BIS #2, JFKCSR :CLR INTERVAL TIMER FLAG 
010056 022701 020726 CMP WCHREND#1, R1 FINISHED? 
010062 001401 BEQ ;YES, RE-START TEST 
010064 d0000e2 RTI EX 
010066 004737 016710 ISR PC, CLRFKV *CLR INTERRUPT VECTOR 
010072 O22626 POPesP RESET STACK 
010074 104006 ENDTST 
010076 000637 BR FKCHAR RESTART TEST 
010100 000200 171402 CHRERR: BIS #200, JVTCSR * ISSUE AUDIO BEEP ON ERROR 
010106 737 O24144 TST FIELOSW *1S FIELD SW SET? 
010112 001306 BNE CHKFK2 : YES 
010114 005237 o24144 INC FIELDSW *NO, SET °FIELD’ SW. 
010120 112720 000374 MOVE #374, (RO)+ *SELECT *BOLD-UNDERLINE’ 
010124 000701 BR CHKFKe °SET FIELD CONTROL SOFTWARE SW. 
Peete cs tts 25 51-a  Sall lllllllllllllllllllaiaal 
TION KEYBOARD REPEATIBILITY TEST ( 
THIS TEST VERIFIES THAT A SELECTED CHARACTER OR CHARACTERS (MAXIMUM OF TWO) 
ARE RECEIVED CORRECTLY FROM THE KEYBOARD. WHEN THE 'REPEATIBILITY’ TEST IS 
SELECTED THE PROGRAM HALTS. gh THE CODE FORTHE CHARACTER TO BE VERIFIED 
jIN THe DATA SHITCHES CHES AND PRE NUE be ve PROGA th HALT AGA AGAIN. 
tONE cHnAS TER tS ee ice CHECKED, RARAC TER T CONTI Faee 2ND TIME WITHOUT CHANG- 
"ING THE SWITCH SETTING. NPUTTED_ CHARA TERS ARE VERIFIED THEY ARE 
;ALSO DISPLAYED ON THE *V i AN IS DETECTED, THE AUDIO "BEEP* IS 
D AND THE NECETVED CHARACTER IS DISPLAYED AS ° 
eee aeeeHITEECSSSEUSSASUETESETLALSNSAGRUSEEPATERAESSSESSSESTETECHLEOONES 
010126 005737 o24154 FKREPT: TST TTYSWH sTTY AVAILABLE? 
010132 001404 BEQ FKRPTA 580 HALT TO GET CHAR. CODE 
010134 104012 PRINT 
010136 d22506 MES1S ‘REQUEST CHAR. CODES 
010140 104015 ASEMBL *DECODE CODES 
010142 O00406 BR FKRPTB 
010144 00000 FKRPTA: HALT GET 1ST CHAR. FROM THE SWITCHES 
01014 117703 171152 MOVB  a@SWR,R3 :SAVE 1ST CHAR. 
010152 000000 HALT GET 2ND CHAR. FROM THE SWITCHES 
010154 117704 171144 MOVB  @SWR,RY ‘SAVE '2ND’ CHAR. 
010160 042703 O00200 FKRPTB: BIC #200; RS 
010164 042704 0o00200 BIC #200;R 
010170 012737 O10160 oP0406 MOV SFKRPTB, RETURN 


TAS RT DIAGNOSTIC TEST PROGRAM 


0310 00407 
oie oy 
0320 005037 de4144 


Bidsso b0si05 


000002 171132 


‘TAD.P11 

2008 tet, 104000 

30 SE FE woe ous 

Bi Be fee 

3013 010216 004737 017062 

3014 O10e22 004737 016654 

3015 010e26 010234 

3016 010230 1 

3017 010e32 000776 

i 

3020 010234 105777 171234 

302i 019e40 100035 

Be HES Wom 7 

3024 Mts 001003 

Segoe 

3027 010256 o0040e 

3028 010260 sae 

$5 BE BY oem niet 

3031 teska nis 024144 

35 HE HO coun 

3034 Tete 112720 000374 
0 
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DISPLAY 

MES14 ;TEXT ’FK REPEATIBILITY TEST’ 
CLR ff ee LR F ONTROL SOFTWARE SW. 
ik OR ELE LORRING Rec 

JSR PC, TTYENB ENABLE TTY INTERRUPTS 

TSR PC’ LDFKVT LOAD "FK’ INTR. ADDR 

FREPTO 

WAIT WAIT FOR ’FK’ INTR. 


BR | 
;ENTERED HERE ON ’FK’ INTERRUPTS FOR THE REPEATIBILITY TEST 
FREPTO: oe aFKCSR i FLAG SET? 


EXREPT INTERVAL TIMER FLAG 

MOVE § aFKDATA,R1 ipa AD & SAVE DATA 

TST RS CO PARE 1ST OR 2ND CHAR.? 

BNE ‘FREPTI :2ND 

CMPB sé, RG :RECV’D = EXPT’D CHAR. ? 

BEQ REPTOK : YES 

BR REPTER NO, SET UP ERROR 
FREPT1: CHP RI RY sREGV’D = = EXPT’D CHAR. ? 
REPTER: BIS sAUDI0 avTCSR : ISSUE AUDIO BEEP 

TST FIELDSW FIELD SW. SET? 

BNE FREPTe VES 

INC FIELDSW SET IT 

nove #374, (ROD+ :SEND BAD CHAR. AS *BOLD-UNDERLINED’ 
REPTOK: TST FIELDSW sFIELD SW. SET 

BEQ FREPT2 YES 

CLR FIELDSW “NO, CLR IT 

MOVB #360, (RO)+ ‘CLA FIELD CONTROL CHAR. 
FREPT2: COM RS : SOFTWARE SW. 

MOVB RI, (RO)+ : TRANSMIT RECV’D CHAR. 
EXREPT: BIS #2; IFKCSR CLR INTERVAL TIMER FLAG 


RTI 
ppeenecoventnnnrpentea tT 
;VT20 SYSTEM EXERCISER TEST. (TEST 21) 
;THIS TEST 1s DESIGNED TO EXERCISE THE VT20 IN A SYSTEM ENVIRONMENT. THE 
; TEST UTILIZES THE VT2O (DISPLAYS & KE ) ASSOCIATED Bit S 
UNCTION WITH A HOST COMPUTER. TO RUN THES TEST THE DL11 DATA 
MUST NTO THE HOST COMPUTER. THIS 
ee ae oR ° reese ti re THE system TEST 
CHARACTERS ARE RECEIVE THEY ane St D INA i SUFFER 
TERS (6 COMPLETE 


nese ACCEPT UP TO 
are ow ae Ha. Seereen Ta pe 


re 
HEU e MONEE 8 Wadi Wien! i 
PRP aE OUe BME Sct tant EE HN Get 
; IF THE RECEIVED oy DOESN Ls a ITTED DATA, THE RECEIVED 
pCHACAC TER 1 IS DISPLAYED AS fs» BOL D-UNDE ERLINED 
; THE SYSTEM TEST Uses AN ERROR REPORTI SCHENE OF DISPLAYING ALL 
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3064 ;ERRORS AS THEY ARE TERS. THESE 
iad ‘Ents Ae te at! Fy Ti Par iCute eae Wak A’ ME AT 


= a Se a ee 
TO RE NORMAL 


‘WILL STOP DATA URRENT TRANSFER) 
3070 AND AL PROGRAM 
aoeh SeapaaesnesEeeusseroausestbactassressesninnacs sineeesenneneueneuneseeeen 
3073 010344 012737 O10344 O2040& SYSTST: MOV #SYSTST, RETURN 
3074 010352 o00005 RESET 
3075 010354 012737 010344 024130 MOV #SYSTST, AVECTR ;SET UP THE RESTART ADDR. 
se titers fier? feieet joie © RY MSSIGIR | _iBISSAY TEST AesGeN On QUT 
3058 nates 737 A2d3P CMP “4, Unt To 34 UNITS? 
3079 010404 001013 BNE 
3080 O10406 012777 021651 171042 MOV #MES9, @VT3SAR ;DISPLAY TEST HEADER ON UNIT °3’ 
3081 010414 171040 INC 
3082 010420 012777 O21651 171014 1S: MOV #MESS, @VT2SAR ;DISPLAY TEST HEADER ON UNIT 2’ 
3083 010426 005277 171012 INC aVTeCSR 
3084 01043e BR 3$ 
Spee 010434 022737 OO0003 024136 2%: CMP #3, UNITNO ;3 UNITS? 
3087 O10442 001766 BEQ 1$ 
3088 O10444 77 170744 3S: INC aVTOCSR 
3089 010450 77 170754 INC aVTICSR 
har Biovee {pup BEtAYE 
a BONES 12777 000340 170622 SYSIT1 er EoH, ioe 1 PRO a en so a) 
ae : 

Sa Btowee Bison Segre MOV tech eT FR AP tO GPA SOPTWARE USER SW.*S 

309S 010474 905020 CLR 
010476 022700 o24424 CMP START, RO ; DONE? 

97 g1080e O01 74 BNE - :NO 

98 O01 12 O11766 171026 MOV #RECVO, JRINTO *LOAD DL11 ,REC. VECTOR ADDR. °S 
3099 010512 012777 000200 171982 HOV #200, SRLVLO “BR LEVEL 
aie ft 12777 raid 151518 MOV pitt ati 
310 010534 012777 011706 171036 HOV a axinro ;LOAD DL11 TRANS. VECTOR ADDR.'S 
iba BibecR B1552% po0sog 71036 Hoy BaP atin mou 
3105 O10556 012777 000200 171022 MOV 
3106 O10564 012777 Oll626 170546 MOV ae SFKOINT ;LOAD *FK’ VECTOR ADDRESSES 
3107 106 012777 O00200 170542 MOV # 

108 O10600 012777 O1i642 170546 MOV #SERFK1, OFKLINT 
3109 O1 012777 000200 170542 MOV #200, OFKILVL 
3110 aha 1 024474 Noy wT ,RO ;LOAD 'VT’ BUFFER POINTERS 
atte 106¢ 011610 ISR PC’ DISPMS ;DISPLAY HEADER MESSAGE 
S14 Olbess 10077 170s4 NOV ay TRU eAg00. Re LOAD ‘VT’ STARTING ADDR. REG.*S 
atic Bites Bt0002 170eeY MOV fo SVT TSAR (Pes 
aie BI DENE yee peaees aoe vipa F+55. ,RO 
3118 O106s2 5} 37 raat MOV RO, BUFDR _ ;RO BUFFER POINTER FOR UNIT 0” 
3119 010656 010037 O24414 MOV RO; BUFOR1 :Rl BUFFER POINYER FOR UNIT °O° 
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#VTBUFF +1055. ,Re 
RO 


ict OT eee nse panne Soy BUF 1 RO BUFFER PCINTER FOR UNIT ‘1’ 
315s nie Sz Bi 0s3? rae MOV BUF IRI °R] BUFFER POINTER FOR UNIT '1° 
3123 010676 012737 010726 oo0004 MOV #00110, a84 ;SET UP TIME-OUT FOR MISSING DL’S 

124 010704 ol 000340 000 MOV #340, 2&6 

125 010712 012777 000100 1 MOV #100; JRCSRO sENABLE DL11 REC. INTR’S 

126 010720 012777 000100 170632 MOV #100, JXCSRO ‘ENABLE DL11 TRANS, INTR.’S 

3127 010726 012737 010750 OO0004 DLIIA: MOV #0L118, 084 

3128 010734 012777 000100 MOV #100, aRCSR1 

3129 010742 012777 000100 170612 MOV #100; dXCSR1 

3130 10750 Oce737 000004 136 DL11B: CMP #4. UNI TNO :4 UNITS? 

132 t 127 17056 nO Tex @RINT3 NDAD Br 11 REC VECTOR FOR UNIT °3° 
He flee tee Gee |e Bs Rich gr vecro ron at °7 
aid pt hae pt ope ae V #200, aXLVL : PEVEL ry? 

3136 011010 012777 011672 170366 MOV #SERFK3, OFKZINT :LOAD FK VECTOR FOR UNIT *3° 

3137 011016 012777 000200 170362 MOV #200 :BR LEVEL 4° 

3138 011024 O1 032 4 MOV 8VTBUFF +3000. ,R2 

3139 011030 ste 4 170422 MOV R2, aVT3SAR sLOAD ‘VT’ STARTING ADDR. REG 
a guia Site Gust i) ARUP aos 

3t43 bt tous ite BBauy Re, SUP SRO ;BUFFER POINTER FOR UNIT ’3” 
a3 Glee pide Eee mm = RY etic an 

3145 Bt bee ot 100 170436 MOV #100, IRCSR3 sENABLE DL11 FOR UNIT °3° TO INTERRUPT 
314 011070 012777 000100 170470 MOV #100; —aXxCSR3 

3147 011076 012777 000101 170354 DLIIC: MOV #101, aVT3CSR START VT 

3148 011104 012777 OO0101 170266 MOV #101’ aFK3CSR ‘ENABLE FK INTERRUPT 

3143 O1iiie O1e777 Oi201e2 170830 TAGIX: HOV whe Ce oR INTE sLORD BL11 REC VECTOR FOR UNIT °2° 
3151 ptt tse Ee ieee 170454 MOV we00 SRLS *LOAD DLI1 XMIT VECTOR FOR UNIT ‘2° 
sib 011134 012777 O00200 170450 MOY #200, aXLVL2 : VEL ‘4? 

sisi Bliss Bierce yess iraeis = Ay Renueaeeag™ | ESAEL GTR FOR UNIT “2 

3155 Bitiee 12702 030414 MOV SOTBOPE + . Re F 

3156 O11162 010277 170254 MOV R2, aVT2SAR sLOAD ’VT’2 STARTING ADDR. REG 
3157 O11166 737 011610 JSR C’DI 

3158 011172 Ole702 03 MOV aVTBUFF+2055. ,R2 

3153 011176 010237 24410 MOV Re, BUF ERG ;BUFFER POINTER FOR UNIT ‘2° 

3161 Bt LSpe p10533 11230 o00004 MOV PS anere 

3162 011214 012777 000100 170302 MOV #100, \ @RCSR2 ;ENABLE DL11 FOR UNIT ‘2° TO INTERRUPT 
3163 Ol ieee 012777 9001 170334 MOV #100, aXCSRe 

164 O11 012777 101 1702068 OL11D: MOV #101; aVTeCSR :START VT 

3165 011236 012777 000101 170120 MOV #101; aFK2CSR :ENABLE FK INTERRUPTS 

3166 G11e44 ooo404 BR TAGSK 

168 011246 022737 OO0003 024136 TAG2X: CMP #3, UNITNO ;3 UNITS? 

3188 0112054 601716 BEQ TAGIX :YES, SET UP UNIT 2 

3170 011256 012737 000008 OO0004% TAG3X: MOV #6, 84 “RESET THE TIMEOUT VECTOR 

3171 011264 012737 OO0004 oo000 MOV #4) Nb 

3172 011272 Ole 000191 i70114 MOY #101, aVTOCSR :START VT'S 

3173 011300 912777 900101 170122 MOV #101; aVTICSR 

3174 011306 @i2777 O00101 170020 MOV #101; aFKOCSR sENABLE ‘FK’ INTERRUPTS 

3:75 011314 012777 000101 170026 MOY #101’ aFKICSR 
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ao 

3178 011322 O00S077 167764 CLR aPSW :SET PROC. PRIO. 30 

he 11326 12709 paso SERVCE: MOV aVTBUFF +08. , RO 

1 ? 2 V CHRCTO,R 

3} aie O1570e BINDEC ;UPDATE THE CHARACTER COUNTER 
He Glee Gre OS my, weno 

3i8s Bi iad 1 BINDEC ‘ :UPDTAE THE RECV’D CHAR. COUNTER 

ue tie, Gime Seas my. ewe 

ae Olas j BINDEC * ;UPDATE THE TRANSFER COUNTER 

im Gime Gere GES my. one 

3188 O11 74 104024 BINDEC ‘ sUPDATE THE ERROR COUNTER 

1! 11376 Ole 026454 MOV #VTBUFF +1008. , RO 

3191 011402 013702 O24232 MOV CHRCT1,Re 

3192 O11406 104024 BINDEC 

3193 011410 b1e709 026472 MOV #VTBUFF +1022. ,RO 

3194 011414 024316 MOV RECTRI,Re 

3195 011420 1044 BINDEC 

319% 011422 O12 026510 MOV #VTBUFF +1036. , RO 

3197 011426 013702 024306 V TRANF 1, Re 

3138 Oi 1436 o4 BINDEC 

1 114 i 026525 MOV #VTBUFF +1049. , RO 

3200 O11440 013702 024336 MOV ERFLG1,Re 

Baie pt tae sO? 924136 000003 pepoet UNITNO, #3 RUNNING ‘3° UNITS ? 

3506 Bt tien B53, BLT wee ?NO, RETURN TO SERVIC 

Be iit dire Gch my oe 

3206 Ot 14ee BINDEC ' UPDATE THE CHARACTER COUNTER 

32 114 le 030442 MOV #VTBUFF +2022. ,RO 

3208 011474 013702 024320 MOV RECTR2, Re “ 

3208 011509 108 BINDEC SUPDTAE THE RECV’D CHAR. COUNTER 
id O11 12 030460 MOV #VTBUFF +2036. , RO 

3211 011506 013702 024310 MOV TRANF 2, Re f 

316 11512 104 BINDEC ;UPDATE THE TRANSFER COUNTER 
13 011514 Ole 030475 MOV #VTBUFF +2049. ,RO 

3214 011520 013702 024340 MOV ERFLG2, Re 

Sig BEE: AEE cous, cco = yma eS 

3515 pt 12s8 74 BLT SERVCE’ !NO, RETURN TO SERVICE 

3218 011536 012700 032374 MOV #VTBUFF +3008. , RO 

3219 1 154e 013702 024236 HOV CHRCT3, Re 

3559 pt tede yee 032412 OV #VTBUFF +3022. ,RO 

3222 611554 013702 O24322 MOV RECTR3, Re 

3553 Biieer 012700 032430 BANDE vrBUFF+3036. .RO 

355¢ pt 1BBE Bt ope p36330 MOV tA F 

3226 011572 104024 BINDEC 

3227 011574 012700 o32445 MOV #VTBUFF +3049. ,RO 

3228 011600 013702 O2e4342 MOV ERFLG3, Re 

2229 11504 104024 BINDEC 

3236 011606 O00647 SERVCE 
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2 sENTERED HERE TO MOVE A MESSAGE INTO THE VT BUFFER 
3234 011610 012701 922157 DISPMS: MOV 

3S 011614 1 lige nove a“ COR 

8 11616 122721 000031 C WS’ (R1)+ 

11 13 BNE DISPAS+4 
3238 011624 000207 RTS PC 
3554 sENTERED HERE ON ’FK’ INTERRUPTS FROM UNIT ’0” 
004737 012036 SERFKO: JSR PC, SETBFO -SET UP BUFFER POINTERS 


es Hee Rie Gee Sono EY ere ATER overs 


4 
3245 ;ENTERED HERE ON *FK’ INTERRUPTS FROM UNIT '1’ 

7 Q1164 737 RFK T R NTE 
3eua Dileve Dora? D1s4N4 TER TR Be BERR Seivlce YER) INTERRUPT 
oy 0116Se 000137 012316 SAVE BUFFER POINTERS ON RETURN 
3251 ;ENTERED HERE ON ’FK’ INTERRUPTS FROM WIT 2° 
3505 011656 004737 012152 SERFK2: JSR PC, SETBFe ;SET UP BUFFER POINTERS 
3254 QOilsbe 004737 Ole444 JSR PC’ SERVFK :SERVICE 'FK’ INTERRUPT 
a 011 000137 Ol234e JMP SAYBF2 ;SAVE BUFFER POINTERS 

;ENTERED HERE ON ’FK’ INTERRUPTS FROM UNIT °3’ 


3258 
11 7 RFK PC, SETBF NTER 
3563 BtiBSE Bouoa; | BtSaaa —_— 38 Pe: “SEnvrk Seite "INTERRUP 
3261 011702 000137 012366 mulce et poIN 
3ebe : ENTERED THERE ON Saat S TRANSMITTER INTERRUPTS” FROM UNIT rer 
3264 011706 004737 012036 TRANO: JSR PC, SETBFO ;SET UP BUFFER POINTERS 
3265 011712 004737 013130 JSR PC’ TRNSMT 
seb 011716 000137 012272 JMP SAvBFO 
3268 ENTERED HERE ON DL11 TRANSMITTER INTERRUPTS FROM UNIT ‘1° 
011722 004737 012102 TRANL: JSR PC, SETBF1 ;SET UP BUFFER POINTERS 
3271 011726 004737 013130 JSR PC’ TRNSMT 
7 000137 012316 JMP SAVBF 1 
378 sENTERED HERE ON DL11 TRANSMITTER INTERRUPTS FROM UNIT '2° 
3276 011736 004737 O1215e2 TRAN2: JSR PC, SETBF :SET UP BUFFER POINTERS 
3677 1 i7He 004737 013130 JSR pC’ TRNSM ‘SERVICE TRANSMITTER INTERRUPT 
3678 11746 000137 Ole34e IMP SAVBF2 
3280 ENTERED HERE ON DL11 TRANSMITTER INTERRUPTS FROM UNIT °3° 
ll 737 TRANS: JSR TBF SET UP BUFFER POINTERS 
3586 Bit 4737 pise se 388 PC Tian 
3284 011762 000137 012366 
3286 sENTEPED HERE ON DL11 RECEIVER INTERRUPTS FROM UNIT ‘0’ 
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3288 011766 004737 012036 RECVO: JSR PC, SETBFO 
3289 011772 004737 013362 JSR PC; RECVIT 
3290 011776 000535 BR SAVBFO 
a sENTERED HERE ON DL11 RECEIVER INTERRUPTS FROM UNIT °1’ 
012000 004737 012102 RECV1: JSR PC, SETBF1 
3294 012004 004737 013362 JSR PC, RECVIT 
3295 012010 ooos4e2 BR SAVEF 1 
ce sENTERED HERE ON DL11 RECEIVER INTERRUPTS FROM UNIT ’2’ 
99 012012 004737 O12152 RECVe: JSR PC, SETBF2 ;SET UP BUFFER POINTERS 
3300 01201 4737 013362 JSR BC RECVIT ;SERVICE RECEIVER INTERRUPT 
ae 15538 0547 BR SAVBFe 
sENTERED HERE ON DL11 RECEIVER INTERRUPTS FROM UNIT ’3° 
RECV3: : ; P BUFF INT | 
BtSASd BadsSo BISsEs ECvs: Jah BE RECEEY Eee ORE EES VER Nt ERRUPT | 
012034 000554 BR SAVBF3 


3307 
33 
; SUBROUTINE ENTERED TO SET UP BUFFER POINTERS FOR UNIT ’0’ 
at? 1 012637 o24460 SETBFO: MOV (sP+ KSTORI ;SAVE THE RETURN ADDRESS 
$31e 0100 MOV (SP) 


12042 010046 :SAVE THE WORKING REG.’S 
012044 010146 MOV Ri =P) 
14 1 R2,-(SP) 
1 1 { MOV R3,-(SP) 
1 MOV RY, -(SP) 
3317 012054 013700 e404 Nov BUFORO, RO 
3318 BtSped Mae CLR BUF ; :R2 IS INDEX OFFSET FOR ADDRESSSING 
3320 012066 005093 CLR R3 :R3 1S INDEX OFFSET FOR DEVICE RODRESSING 
321 012070 0187 024563 o24424 MOV #VTBUFF+SS. , START 
2 12076 177 012356 IMP JKSTORI RETURN TO CALL 
3324 ; SUBROUTINE ENTERED TO SET UP BUFFER POINTERS FOR UNIT °1’ 
121 12637 O24460 SETBF1: MOV (SP)+. KSTORI ;SAVE THE RETURN ADDRESS 
7 O1106 Bi oie MOV RO CSP} . ‘gave THE ORK ING €G.*5 
12110 O10i46 MOV R1'-(5P) 
3329 Olell2 010246 MOV R2,-(SP) 
12114 0103 MOV R3,-(SP) 
1 116 104 MOV -(§P) 
121 1 024406 MOV BUF 1RO, RO 
3333 012124 013701 Oe4416 MOV BUFIR1.R1 
3334 ig130 b1270e MOV #2 Re :R2 IS INDEX OFFSET FOR ADDRESSSING 
tel 107 1 MOV #12. ;R3 1S INDEX OFFSET FOR DEVICE ADDRESSING 
3336 012140 012737 026533 o244e4 MOV SVTEUEF +1056. , START 
$337 Olel4é 000177 012306 IMP JKSTOR1 RETURN TO CALL 
333 ; SUBROUTINE ENTERED TO SET UP BUFFER POINTERS FOR UNIT ‘2° 
341 012152 012637 o24460 SETBF2: MOV (sP)+ KSTORL SAVE T TURN DRES 
34 Stee 010046 MOV (SP) i Save THE WORKING 
3343 Ole160 610146 MOV AL -(5P) 


VT20 SYSTEM DIAGNOSTIC 
DBVTAD.P11 


3344 
3345 


Ol2l62 


bob be Bt be bs pe bt pe be pe 


rurore 


O00 
—_ 
fs nore 
SRL 
ONOO00000000 


g 


2 ae 


TEST PROGRAM 


024406 
024416 


024410 
024420 


024424 
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MOV R2,-(SP) 
my oe 
Y Butane 
NOV we R X OFFSET FOR ADDRESS 
MOV #24. R3 RS 12 INDEX OFESet FOR Di Ofte ANSR. 
MOV #VTBUFF +2055. ,ST 
JMP STOR RETURN TO CALL 
; SUBROUTINE ENTERED TO SET UP BUFFER POINTERS FOR UNIT *3’ 
SETBF3: MOV (SP)+ KSTOR1 ;SAVE THE RETURN ADDRESS 
MOV »7(B) ‘SAVE THE WORKING REG.’S 
MOV Se -(5P) 
MOV Re, -(SP) 
MOV R3,-(SP) 
MOV Ru’ -(SP) 
MOV BUF 3R0, 
MOV BUF 3R1,R1 
my tel, 
MOV SVTBUFF +3055. , START 
JMP aKSTORI RETURN TO CALL 
;SUBROUTINE ENTERED TO SAVE BUFFER POINTERS FOR UNIT '0’ 
SAVBFO: MOV RO, BUFORO 
MOV Ri; BUFOR . 
MOV (SP)+,R4 sRESTORE THE WORKING RES.’S 
MOV (SP )+,R3 
MOV (SP)+, 
MOV (SP)+'RI 
MOV (SP)+°RO 
RTI 
;SUBROUTINE ENTERED TO SAVE BUFFER POINTERS FOR UNIT °1° 
soars ya 
MOV (3+, Rd :RESTORE THE WORKING REG.’S 
MOV (SP)+°R3 
MOV (SP)+.Re2 4 
MOV (SP +, RI 
MOV (SP)+,RO 
RTI . 
; SUBROUTINE ENTERED TO SAVE BUFFER POINTERS FOR UNIT ‘2° 
SAVBF2: MOV RO, BUF2RO 
MOV Rl: BUFORI 
MAY (SP)+,R4 ;RESTORE THE WORKING REG.’S 
Mc (SP }+,R3 
MOV (SP)+'R 
MOV (3P +, Ri 
MOV (SP)+'R 
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VT aT DIAGNOSTIC 
OBYTAD.P11 


3400 
3401 


Reo 


bs hh 
WONT CWO 


iaaancreeeee 


? 
at th} 


OOOOOOOOOOOOOO00O OOCOOCOO0O0000 


im 
N 


RB Ss 


BEVFRZS 


Se a ee he te 


<= 
oO 


012364 


= 
Ju 


Boh ah b= fap poe 


O000000 
PeEre 
EeRRRE 


BIAeeeROEE 


wR Ow 
= Gof 


SORRS 


Hateattta ths 
PEGs 


Re 


Bs B= b= bs bh bs hs bs eH be Be a bs be bb Fs be hp Re 


atta tts 
ro 


oco00e 


TEST PROGRAM 


? 
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RTI 
; SUBROUTINE ENTERED TO SAVE BUFFER POINTERS FOR UNIT ‘3’ 


SAVBF3: MOV RO, 
mR Rae 


RY ;RESTORE THE WORKING REG.’S 


MOV (Sp 

MOV (SP)+,R3 
MOV (SP)+,Re 
MOV (aoe ah 
MOV (SP)+, 
RTI 


AEA HERS POAT HE ENP PS Mo PH 
FLGERR: INC hia get ERROR FLAG 
mY brid Hi Sle 


#360, (RO)+ :CLR PRESET FIELD 
MOVE WE0S (RO) s TERMINATE 
ADD #2, (SP) T UP STACK 8° EXIT 
RTS PC 
:FK INTERRUPT SERVICE ROUTINE 
SERVFK: TSTB SEKOCSR(RS) sASCII FLAG SET? 
S BET SHO (Re) :T the AUTO CHR, St SET? 
BNE YES, GENERATE A CHARACTER 
TST PATERN(R2) ; GENERAT NG_WORST CASE PATTERN? 
aut HOLDSO(R2) s INTERVAL IMER, IS ERROR HOLD SET? 
BEQ LINKOD cL INTERVAL TINE FL LAG 
JSR C, TESTSW rY Mee ST SWIS TO CONTINUE 
LINKOD: JMP SERVOD rt STILL SET, EXIT 
AUTOLL: JMP AUTOUT 
JMPWOR: JMP WORST 1 
SERVOO: TST OFKOCSR(R3) sERROR FLAG SET? 
BPL SERVOA :NO VALID CHAR. 
ISR PC, FLGERR its ASCIT an FLAG SET 
113 ISPLAY A *BLINKING kK’ 
SERVOA: MOVB #§ @FKODAT(R3),RY BaD 8 CHAR 
CMPB s«#3, RY Ga ="¢ 
BNE SERVAA TINUE 
Ist BusYo(R2) ives, “OL Sy? 
INC STOPO(R2) ves SET STOP SW. 
BR ERVOD EXIT 
RELOAD: MOV START. RO RESET BUFFER POINTER 
MOVB HE0 t :SET UP FOR NEW INPUT 
CLR ERO(R 
CLR MreTROCRE) 
CLR OPO( 


STOPO(R2) 
CLR STCODO(Re) 


LOS 
V720 SYSTEM DIAGNOSTIC TEST PROGRAM  MACYI1 27(732) 16-FEB~77 09:54 PAGE 63 


3456 CLR apt bet 





57 SOE CLR KE (Re) 
¢LR TERN(Re) 
59 O01 CLR TSWO(R2) 
ANSNE CLR (Re) 
3461 Olebse 005062 de4314 CLR RECTRO(Re) 
sei fine Gee fees ett 
4 O1 024230 CLR CHRCTO(R2) CLR CHAR. CNTR. 
12652 024200 CLR (Re) 
12658 024170 CLR CSWO (Re) 
67 O1 il RVOD EXIT 
s68 12664 1ee704 oo0024 SERVAA: CHPB #24, R4 CHARS tT! ? 
3498 Bi Se7e i62 024364 COM SFE (R2) yee oy ae TRANSFER SW. 
S472 912700 eres 024374 FE BURYOCR2) 3108 Auto TRANSFERRING DATA? 
3473 15709 Bol ieb BRE s CURREN 
3474 012706 005762 024354 SERVAB: TST RESTRO(R2) HAS A ie TART ADDR BEEN LOADED? 
3475 Ole7l2 0014 BEQ a iNO, TERR NATE INPUT BUFFER 
3476 Oie714 16200 024354 HOV RESTROCR2) ,RO RESET BUFFER POINTER 
a78 Wi 100758 000014 MOVB EGP (RO)+ ale MESSAGE 
3173 012726 SERVBB 
3481 012730 122704 000001 SERVOB: CMPB = #1, R4 sCHAR. = TO’ 
a8 12794 1556 BEQ autost : YES AUTORAT ICALLY GENERATE CHAR. 'S 
1 122704 00005 CMPB Osa’, RY :CHAR. = TO ’TE? 
3484 012742 001705 BEQ RELOAD ;YES REL AD 
85 tera 122704 000027 CMPB R. ey? ? 
Suge 12750 001574 BEQ WORST YES GENERATE WORST CASE PATTERN 
3487 Ol 005762 024374 TST BUSYO(R2) *DL1i BUSY? 
s188 1 105, BNE RVOD vee IGNORE CHAR. 
12760 122704 000033 CMPB 2 s#33,R4 "REQUEST TRANSFER? 
3490 b1e764 001024 BNE SERVOC :NO 
3493 ft 8 0 710 SERVBB: MOVB rat (RO) 
3493 012774 010062 renee a HOV RO, RESTRO(R2) ;SAVE LAST ADDR. FOR AUTO RESTART 
ees 
fice BtSORR B1SSRS ope081 Be t3h0 MOV BE PROS RRS gel PRANSPER, S E Su. 
3496 013014 013701 MOV START, RI SET UP UP BUFF R, 3 INTER TO TRANSMIT DATA. 
EAA 13029 7) a TSTB Os =(R1L FER POINTER 
1 12762 OO0004 024210 MOV #4, NULCTO(R2) 
3499 013030 105072 001570 SERVBC: CLRB § aXBUFO(R2) ; TRANSMIT THE START CODE 
BH Gee ie Bs oe 
501 Ol 122704 000177 SERVOC: CMPB 8177 R =" RUBOUT’? 
3209 DIa0N) Operee 024230 one SERVEC oy UErER 
eh SHES lay ne 
2% tas (any Sou mie eos as 
3209 Btsnes bdgait oe ; i Baye 
3608 01 3068 026227 024230 000600 SERVCC: cH CHRCTO(R2) , #384. ;BUEFER R FULL? 
ste ot 74 024230 NC HRCTO(R2) tTRCRER NT CHAR. CNTR. 
3511 013100 110420 MOVB —-R4, (RO) + NO, SAVE CHAR. 


at, a sie DIAGNOSTIC TEST PROGRAM 


3512 013102 112710 000031 001334 
Bit BISIRS feizep SOE om 
3515 01311 024250 
a5 bhi Bae ==" 
zit 
351 
= HR Bag oe 
eas O13i%e 024344 
131 
13139 oo 004 024200 
Se He Bux 1 
BS Be a ae 
EH Gis Bere Weir BL 
2 Olsens Ob 436 000003 013270 
i 024210 
3835 teat 003306 
Se es Recs may ms 
340 b1 3030 7e1 000014 
BL BES BIL coon 
su ES eas Ee 
3545 eee 013701 d24424 
3249 1 35e8 ll 001570 
3548 013266 000207 
3549 013270 0000 
3550 
a 
3553 013272 012704 000041 
3554 013276 010462 O24e74 
a4 01 000670 


goscee eee “ 

Boor4e OB48r4 
000040 024274 
024274 


fee 8 


OO0O00000 
: 
R 
RSE2 
fo 


ea OS Gant eee fom he be 


oS 
52 
ro 
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MOVB ‘#05, (RO) 

SERVOD: BI fe , FKOCSR(R3) 

SERVDX: CLR TE RN(RE) 

SR het 

;DL11 TRANSMITTER SERVICE ROUTINE 

TRNSMT: TST INTRNO(R2) 
BNE 


eR INTERVAL TIMER FLAG 
ict AR AR WORST oF CASE PATTERN SW. 


;LEGAL_INTERRUPT? 


sYES SERVICE IT. 
INC TNTRNOCR2) THIS IS THE INITIALIZE INTERRUPT. 
RTS PC iM 
if PC, FLGERR vs ILL Foal i cae INTERRUPT 
124 rc ‘DISPLAY A *BLINKIN 
TRANOA: Hex ;READ THE SWITCHES 
BIC econ RSPRT 
MP +SuO1, R3PRT ; LOOPING pata? 
eed 1A CTS sYES, EXI 
(R2) 
BCT ;XMITTED 4 NULL CHARS? 
MOVB roc 
CLR < ;RECV’D CHARACTER COUNTER 
TRANOB: CMPB  #EOP, (R1)+ iA CHAR. BEEN TRANSMITTED? 
BNE TRANOC « TRRISHET RexT CHAR 
ce Ruernee becherto B 
fre «| RECERO CRS} ie 6B ce ATA 
MOV START,R1 :RESET POINTER TO COMPARE DATA 


RTS C xX 
TRANOC: nee {Bt} SUPA) TRANSMIT NEXT CHAR. 
R3PRT: .WORD 0 


;ENTERED HERE TO INITALIZE THE AUTOMATIC CHARACTER GENERATOR 


AUTOST: MOV a1 R 
MOV 4 AUTsuOcRe> 
BR pale 
ENTERED HERE TO GENERATE AND OUTPUT THE AUTOMATIC CHARACTERS 
AUTOUT: INC ;UPDATE THE CHARACTER 
Homans 


its CHARACTER LEGAL? 


BNE : 
BIS 40 TSWO(R2) NO, RESET IT 
HOV aut SH (R2),R4 


;ENTERED HERE TO INITIALIZE AND OUTPUT A WORST CASE CHARACTER 


Lo ola] =) 
peep b= be 


aaa ai 


DOOCOVCOOVCDVO COO VCOOOOSODOOOOO0ND COOCOOOOOOOOOCO0OO0O0O0000 


0 


N“N 
— me Be Bae a ae Pe fae = bm hee fs Be Bt fb ot ee pe ee 


Be Pd fF be st bb fe be be 


ROREER Eiri SopGRRe ORES 
SAIS 
% 


E 
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—m 


;PATTERN OF *12S & ese’. 


3342 112762 000252 O24250 WORST: MOVB #252, PATERN(R) 
3350 105162 Oe42S0 WORST 1: coe PATERN( RE) ;COMPLIMENT PATTERN 
Bo Wa es oem 


;DL11 RECEIVER SERVICE ROUTINE 


ns RECVIT: NOV R FO(R2) ,RY READ DATA BUFFER 
ADD #900.;R5 i18 BUFFER LIMIT EXCEEDED? 
BGT RPAVON ih3, process CHARACTER 
165716 014020 MOV  @SWR, RAPXT LIF SWO AND SW1 ARE SET - 
pooos 814080 Be eet hlext SOO ONFIMUE. we) THE SUFFER 
oe44e4 an ean RO | 


000014 1S: Ree RY TRANSFER COMPLETE? 
RECVOD sYES, SET UP TO EXIT 


RTS : THE CHARACTER 
924170 RECVON: TS CSWO(R2) Peete 

000001 165644 Se ELOD OSUR :YES, LEGAL REC. INTERRUPT 
i Yes. HOST SENDING para 


Sears 


012412 STERR: JSR PC, FLGERR "NO, ILLEGAL REC. INTR. 
122 s DISPLAY A BLINKING R’. 
34 RTS PC | EXIT 
3472 RECVOA: TST RY sREC. ERROR BIT SET? 
3474 100021 BPL RECVOB :NO, VALID CHAR. 
3i76 p3e704 040000 iT #40900, RS ; OVERRUN ERROR? 
3504 004737 Ol1e412 JSR PC,FLGERR YES, DATA OVERRUN ERROR 
3219 117 i? DISPLAY A *BLINKING 0’ 
12 RECVOB 
3514 032704 o20000 BIT #20000, R4 ;FRAMING ERROR? 
14 REQ tle sO 
7 7? 012412 ISR PC, FLGERR :YES, DISPLAY A ’BLINKING F’ 
23 fra? plewie =a PARITY ERROR 
ce 80120 0 ’ ;DISPLAY’A BLINKING 'P’ 
3540 017737 165560 014020 RECVOB: Nov OSUR,RSPK i >READ THE SWITCHES 
Pi ey hoa003 stiiely ed #5WO0+SW01, RSPXT ;LOOP DATA BACK REQUESTED 
ae) ee, wnt vert cue |S 
;= <a 
Se: YES 5 > 


Q RECVOE GNORE IT 
024220 TST STCODO(R2) HAVE WE RECEIVED THE START CODE? 


0057 ; 
132704 000377 BNE 77 Ne 18 Thig aT 
11 BNE cvAB °NO, CHECK *SWO’ 
112720 000136 MOVB #136, (RO)+ YES, DISPLAY ST. CODE AS ’t’ 


vT20 SYSTEM DIAGNOSTIC 
OBYTAD.PLI 
13610 11 

Sese D1seiy | 11S710 
3626 013620 005262 
3627 013624 000474 
3628 

3629 013626 1 
3630 013632 001425 
seae Dlaesa Teckel 
3633 013642 001415 
3634 013644 005762 
3635 013650 001002 
3636 013652 005262 
3637 013656 005262 
3638 013662 112720 
3640 13670 115750 
S41 O13e74 OOO40L 
se42 013676 110420 
Seva O1a704 | Oo0e0? 
3645 013706 005262 
3646 013712 005062 
3647 013716 005062 
3648 013722 005062 
3649 013726 005762 
3650 0:3732 001431 
see D1a740 Obi Ge 
383 Dlarue God1a? 
3654 013746 016200 
3655 013752 62 
3656 013756 O014ie 
ss 013764 100411 

23 iavee ooszee 
3660 013772 001404 
3661 013774 005062 
3662 014000 005062 
3663 014004 000137 

4 B14010 O1e7be 
Seep 014020 G00000 
3667 

3669 014022 032777 
3670 O14030 001322 
3671 14032 000704 
3672 

3673 

S75 14034 gOseE2 
3676 014040 

3677 O14044 905262 
3678 O140S0 110472 
3679 014054 042704 


TEST: PROGRAM 


Ole 
031 
Oe42e20 


165340 
024240 
024334 
Oe4240 
012770 
000001 


000001 


177400 


024240 


165274 
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MOVB #12, (RO)+ 3ST NEW LINE 


MOVB = #£05, (RO) ; TERMINA — BUFFER. 
INC STCODO(R2) i 
BR RECVOE EXIT 
RECVEB: CMPB = #E OP, R4 -s TRANSFER DONE? 
BEQ RECVOD SET UP TO EXIT 
NC RECTRO(Re) es K OF NO. CV’D CHAR.S’S 
MPB sR. (RI) + C. DATA TO TRANS. DATA 


RECVOC 
RECVBC: TST BLKERR(R2) 


ines M, BLOCK ERROR BEEN DETECTED? 
BNE 1$ ROR COUNTER 
INC ERFLGO(R2) 


;YES, DON’T UPDATE ER 
DATA ERROR SET SOFT SWITCH 


1S: INC BLKERR(Re) 
MOVB #374, (RO)+ areas CHAR IN “BOLD-UNDERLINE™ 
MOVB RY, (RO) + 
NOVE #360, (RO)+ ;CLR FIELD PRESET 


RECVOC: MOVB Ru. (RO)+ ;DISPLAY REC. CHAR. 


;EXIT 
RECVOD: INC TRANFO(R2) ; TRANSFER COUNTER 


CLR RECSWO(R2) cLR. fF; BOF THARE SW. 
oe SFERDCRED i at . FER SET? 
BEQ CVOE | uno TR Mee B EXIT 
TST STOPO(R2) ves, STOP SW 
BEQ +6 NO “START T NEXT SERANSFER 
IMP RELOAD ?YES, 
MOV RESTRO(R2) ,RO :NO * RESET BUFFER POINTER 
TST ERFLGO(Re) ; ERROR nr T? 
BEQ CVOD START NEXT TRANSFER 
TESTSW: TST aSWR ‘yes, IS SWIS SET? 
Eh RECV :YES, INHIBIT FURTHER TRANSFERS 
S HOLDSO(R2) *HAS SW1S BEEN SET AND NOW RESET? 


:NO, IT HASN’T BEEN SET 


BEQ RECVOD 
CLR ERFLGO(Re) YES, RESET THE ERROR COUNTER TO ’0’ 
HOLDSO(Re) 


RECVOD: JMP SERVBB ;SET UP NEXT TRANSFER 


RECVEE: MOV Bh MA DSOCRE? SET TO HOLD XFER 


RECVOE: RTS 
R3P 


XT: -.WORD 0 
RECVAB: BIT #SWO0, aSWR :IS SW ’O’ 
BNE RECVOC ?YES, JUST D Spay CHARACTER. 
BR RECVBC :NO, POST AS ILLEGAL CHAR. 


;ENTERED HERE IF BOTH *SWOO & SWO1* ARE SET 
RECVAC: INC RECTRO(R2) ;UPDATE RECEIVE ye 
INC TRANFO(R2) UPDATE TRANSMIT COUN 
SET THE TA ee SUITCH 


INC TRNSWO(R2) 
MOVB R4, JIXBUFO( Re) TRANSMIT C 
BIC #177400,R4 :SET UP TO DISPLAY oC TAL REPRESENTATION 


rR ee DIAGNOSTIC TEST PROGRAM 


3681 


Dt 
| 


Ss 


— 

— 
pcre 
Cau 
$68 


000003 
000376 
o00006 


024470 
015166 
000060 


000031 
000370 


000040 
000031 


024154 


024460 


165112 
024460 
003026 


024470 
C1S166 


015166 


024460 
006174 
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;OF THE CHARACTER 
MOV #3 qh 


MOV #376. MA 

MOV #6, ye 

BR 
MOVE]: ROL 

ROL By 

Si Stas 

ie igies 

BICB ASK, Re 

MOV 98° RS ;PUT CHARACTER IN DISPLAY BUFFER 

MO #£0S, (RO) : TERMINATE BUFFER 
MOVE2: MOV #370, MASK 

DEC R3 : DONE 


MO ; 
#40, (RO) + ;YES, PLACE *SPACE’ CODE IN BUFFER 


RETURN 
| AHHH HEHEHE HBS Haggai ae 


ae SELECtING Test?” UpOn ENTERING Tilo” SUBROUTINE ANOTHER "HALT. 1S EN- 


THE SUBTEST TO BE EXECUTED tN THE DATA 
Sur THES. RES 


:NOTE THAT ’SW11’ SEONLINE, (DOWN) TO RUN THIS TEST. 
Prtrtii iti iiiittitittiitititititititititititiitiiititiiiiittittttittittttye 


TESTX: TST TTYSWH Mg AVAILABLE? 
Q TSTA *NO ie a Be EST ADDR. 


PRINT 
MESS “Text ’TEST ADOR.? ’ 
ASEMBL “YES. GET ADDR. FROM TTY. 
MOV R3,KSTORL :SAVE ADDRESS 

nae BR TSTB sEMECUTE TEST bee. 

“MOV aSWR,KSTORI ‘ove RBORESS 

TSTB: cMP KSTOR1, & #SETUPF ;’FK’ uf cou, LOGIC TEST? 

JSR PC, SETUPY S61 UP UP a "VT? 


B 

JSR PC, SETUPF 

ADD 2. KSTORL 

MOV aKSTOR1, TSTNUM 
#2, KSTORI 


ADD 
XLOOP: CLR SCOPEF +K T AT ZERO 
} Ov aL 0b RETURN CORD Sere Look RETURN POINTER 
RR RT. SRT Te REE NIE 


SUBROUTINE TO ISSUE N _— 
sN IS ONE PLUS VALUE CONTAINED IN SPACEX 


;SPACEX IS C TINE 
;SPACE WITHOUT LOADING SPACEX ISSUES ONLY ONE SPACE 
Neri iiiirii titi ti sire t ire tir rrr Sire r rrr 


TO pone TO INSTRUCTION AFTER SCOPE 
:POAD Fest NO 
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AD 
3736 
3737 014276 105777 165016 XSPACE: ISTB aTps sWAIT FOR TTY READY 
3 teed A038 000240 165010 MOV #240, JTPB OUTPUT A SPACE 
3740 014312 005337 014326 DEC SPACEX ; DECREMENT COUNT_ 
3741 014316 003367 BGT XSPACE "LOOP IF NOT 
3742 014320 005037 014326 CLR SPACEX ‘RESET COUNT TO ZERO 
3743 014324 o0000e2 RTI * RETURN 
3744 014326 000000 x: O 
ne 4 SUBROUTINE TO TEST FOR THE KEYBOARD FLAG BEING SET eee 
; SUBROU K 
© RELA KAALAS RRA REA AEA AERA RELA RRA REAR ARE AA LAA SAA LEAKE ERA KA RRL AA REA LEELA LAE LES 
3548 ; 
3749 014330 005737 o241S4 TKSFLG: TST TTYSWH sUSING THE ’TTY’ ? 
3750 014334 001404 +12 NO, EXIT 
3751 014336 105777 164752 TSTB = TKS :FLAG SET? 
3752 014342 100001 BPL +4 :NO, EXIT 
014344 104013 TTYIN YES, INQUIRE 
3754 014346 O00002 RT 
aap SKEYBOARD SERVICE ROUTINE enn NAA RMRESREAARSESSSEREESESANSS 
3724 014350 012704 914600 Fe ry pare gr ns po reese 
4 4 
3759 014354 005037 24146 CLR CHRCNT ‘Or EaR CHARACTER COUNTER 
3760 014360 005037 014602 CLR INBUF +2 
3761 014364 105777 164724 INPUTA: TSTB TKS ; CHARACTER READY? 
3762 014370 100375 BPL INPUTA :NO, WAIT IT OUT 
3763 014372 017701 164720 MOV aTKB,R1 SAV CHARACTE 
3764 014376 042701 oo0200 BIC #200; R1 STRIFE PARITY BIT 
ire Since ise re Sulee HBSS Barrage OomTE 
3767 O14410 122701 000137 CMPBs«#137,, RI 
3768 O14414 100415 BMI 1 
3769 014416 010124 INPUTB: MOV R1. (R4)+ ;SAVE CHARACTER 
3770 O14420 005237 o24146 INC CHRCNT : INCREMENT THE CHARACTER COUNT. 
3771 O14424 022737 OO0016 oe4146 CMP #14. . CHRCNT 
3772 014432 100450 BMI SPCHRS ;TYPE '?* IF TOO MANT CHAR. 
3773 014434 105777 164660 OUTPTA: TSTB  aTPS :ECHO CHARACTER 
3774 O14440 100375 BPL OUTPTA 
775 014442 110177 164654 MOVB R1,aTPB 
3776 O14446 000746 BR INPUTA ;WAIT FOR NEXT CHARACTER 
3778 i SUBROUTINE TO TEST FOR SPECIAL CHARACTERS, : tC’, +? °CR',*,* OR “RUBOUT" 
3779 O144SO 122701 00003 SPCHR1: CMPB #3, R1 ; CHAR = 4c? 
3780 014454 601002 ENE +6 O,NOT *#C’ 
1 O14456 000137 oD02S526 IMP MONITR a EXIT TO MONITOR 
3782 O14462 122701 O00001 CMPBsé#1, R1 :CHAR. =°tA’? 
783 014466 001005 BNE +14 :NOT * tA’ : 
3784 O14470 Oe POPeSP YES, RESTORE STACK 
3785 O14472 104012 PRINT 
3786 014474 023001 CNTRLA TEXT ‘tA’ 
3787 O14476 000177 007426 IMP JAVECTR 
3788 014502 122701 000177 CMPB =s-s«#177,, RI ;CHAR. = *RUBOUT’ 
3789 014506 001011 BNE SPCHR3 CHAR. & EXIT 
3790 O14S10 005737 o24146 TST CHRCNT 5G RUBOUT LEGAL? 
3791 014514 001723 BEG INPUTA ?NO, IGNORE IT 
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014516 005337 O24146 

Bibs ag 000134 
1 744 
741 


Blvese Ogirey OO 


O14S4O 1e2701 000015 


a 


3799 014544 001003 

3800 O14S46 ASOis 

3801 Q145S0 023005 

3802 014552 000002 

3803 Rees le2e701 000040 
3804 O14560 001725 

3805 Rae ate 

3807 014S66 BOULae 002S26 
3808 014572 104012 

38039 014S74 023007 

3810 014576 O00664 

3811 014600 000000 

3812 014632 

3813 

3814 

3815 

3816 

3317 

3818 914632 005037 024162 
3819 014636 905737 024164 
3820 O1464e 001001 

3558 Bie 77 164636 
= ise tee foe 
3B HSS fre si 
3826 014666 001414 

3827 pee 0057; 

3828 014672 1040le 

3829 014674 023731 

3830 014676 112737 000260 014750 
3831 nH $3737 024134 014750 


14758 D684? ceveuo 


3839 014732 pbioge 010000 164364 


see 014750 000 O1s Ole 
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eS 3 J Ngan gow 
4 yy? 
T -(R4} ie OFF ay CHAR cre 
soma: fo Sarat HELE ag 
Q TReUTE ar’ SAVE IT 
SPCHRY: CMPB «#15. RI 10 tit RETURN’ TO TERMINATE? 
BNE SPCHRS ONT INUE 
PRINT YES, CONE *CR-LF’ 
CRLF 
EXTTY: RTI axtt 
SPCHRS: CMPB 4#40,R1 -TEST FOR SP 
OUTPTA *ECHO BUT DON’T SAVE 
TSTB ;TEST_FOR A NULL CHAR 
+6 EHCO IT 
IMP MONITR  TLCEGAL CHAR. RETURN TO MONITR 
PRINT OTHERWISE TYPE ° 
QMARK 
BR XTTYIN ;WAIT FOR NEW ENTRY 
INBUF: 0 ‘CHARACTER STORAGE BUFFER 


PT iitiiiiiiitiiiiiiitiiitititiihitiiittiittteaneeheee 
;THIS ROUTINE CHECKS THE ’SWAP SW.’ AND IF FOUND SET, SETS UP 


;THE OPPSITE UNIT TO BE TESTED. 
PEreiitittrirtiiiiitiitiitirittititiiiitiititirtiterieretteretcereteds 


TSWAP : wu DONE SW 


ST SHAPEM ; SWAP SET? 
BNE ; YES, SuiTcH UNITS 
RTS be 
CLR aVTCSR PCL LR BIT 
INC UNITFG :SELECT OPPOSITE UNIT 
JSR PC, STUNIT ;SET IT UP 
TST UNETFG :B 9? 
BEQ SWPEXT : YES CONT INUE TO NEXT TEST 
POP1SP :CLEAN UP STACK 
PRINT 
MESSY ; TEXT "RUNNING UNIT °X* 


MOVB #260, MRUNNI 
BISB_  -UNITFG, MRUNNI 


R ;RE-RUN TEST W/ UNIT °X’ 
SWPEXT: PRINT 


Meets ;TEXT "RUNNING UNIT °OQ° 
T HOLDSO 
BEQ .+16 
BIT #SWile2, JSWR 
BNE +6 
1SP 
RTI 
RTS 


PC 
MRUNNi: .BYTE 0,15,12,190 


: PPETETETETETTTTTITT TTT TTT TTT TT TTI TIT TIT TTT TTT TTT TTT TTT 
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3848 ;MESSAGE PRINT ROUTINE, ENTERED VIA EMT DISPATCH HANDLER. 
:R0 TINE PICKS uP CONTENTS OF THE ’PC’ AND USES THIS AS 
S OF MESSAGE TO BE T 
sees ee ecciacabeaectasnetessensansansonensnensnnegnaensenesenensnenscasess 
14754 737 017062 TYPMES: PC, TTYENB TTY INTERRUPT 
seca Giuveo fos0ae ZRVREG iSive Recor Re ONUST 
Blase be ante td get ip eee 5 poGRESs po 
3828 isthe Oper is EEE TYPERA: ray Has 
3859 bane eae 000100 CMPB $100 CR2) ieee FOR y 
3860 pt eboe artes BNE TYPERI SBRBNCH TF H IF NO EQUAL 
3861 015008 104003 GETREG sRes tone REGISTERS EBON STACK. 
3 Ois0ie aganbe RT THR RULSE, EX 
4 O15014 122712 op004s TYPERL: CMPB = #45, (R2) 
seek Ot tes euory TYPER2: MOVE TYPECL og UF TYRE, cR-LF 
36p8 pt ease AasSef MS {Ree a 
3868 015030 012777 000015 164264 TYPECL: MOV #15. aTPB ;TYPE 'CR’ 
3869 015036 105777 164256 TSTB) ss aTPS 
3870 015042 100375 BPL 4 
3971 oO15044 O12 o00012 164250 MOV #12, aTPB 
3872 0150S2 105722 TSTB  =s- (ReJ+ ; INCREMENT BUFFER 
3873 015054 o00746 BR TYPERA 
3874 5 RERELERRLLLE ELLE REL ERLE LEE LAA RAL RA RELA RE ARAL LRA LALA RARE L AAR ALLAAL LAAT 
3875 TINE TO _TYPEOUT A ’6’ DIGIT OCTAL NO. THE ‘PC’ CONTAINS 
B76 ADDRESS OF WORD’ TO BE T 
5g eirririiiti titi itt ti iettrreetiiit ii iet tree irr rir eet tres 
3879 O1S0S& 004737 017062 OCTPRT: JSR PC, TTYENS “ENABLE TTY INTERRUPTS 
3880 ot 4 SAVREG SAVE ae GISTe RS ON ON STACK 
1 015064 017601 ooo000 MOV acSP).R1 70 SE TYPED 
3882 015070 71 000002 a ROO #2, (SP) :SET UP STACK TO Wet 
38 BiEis2 15538 BBDS5E Bic tee Vv 106; SK ;MASK FOR FIRST BIT 
gS 01511 O1 BR +4 
388 015112 O06111 MOVEIT: ROL (R1) 
3887 015114 006111 ROL (R1) 
pibti6 0061 ROL (R1) 
15120 ilil MOVB = (R1),Re 
3890 015122 143702 015166 BICB  MASK;Re 
3891 015126 702 000260 BIS #260, Re 
38 015132 i 777 000200 164160 BITE #200, aTPS 
3894 15 iHe 110277 164154 MOVB R2,aTPB :PRINT CHAR. 
015146 012737 600370 015166 MOV #370, MASK “MASK FOR NEXT 'S’ DIGITS 
38% 015154 005337 dO24466 DEC KSTORY 
3897 015160 001354 BNE MOVEIT 
3898 015162 GETRES RESTORE REGISTERS FROM STACK. 
3899 015164 RTI 
3900 015166 000276 : 376 
sens A HEEHHB HEHE HEHE EBA HHE EHH EH ESHA HEE HEEB HEHE HEHE BAER EERE 
q ;THIS SUBROUTINE IS USED TO CREATE THE ‘VT CHARACTER SET IN NUMERICAL ORDER 
3993 “ALL LINES ARE SET UP TO BE TERMINATED WITH EITHER ‘VISIBLE END OF LINE” 


ra eae DIAGNOSTIC TEST PROGRAM MACY11 27(732) 16-FEB-77 09:S4 PAGE 71 


3904 :OR ‘VISIBLE LE END OF SCREEN’. VT Goan CD WILL RETURN TQ THE ine OUT INE 
ime BORA BOA. He MOSES TRE CGY SRAMD ER Gai 
3907 UBROUT "CALL" BNO We IT WAS THE LAST CHARACTER’ oF We 
3505 OREO RAEROESTOSEESERSTTOESNEAAOMAEESAAESAREAESAEASEOREEAEENAEEOREGEER 
3311 015170 005737 924152 INTCHR: Tet INTSWH sett Te E SUBROUTINE” 
#15 o18i76 o12700 aes id a im Ng geet W/40 (SPACE) 
( |» 
21 bi 3208 B18 708 7770k MOV #-63. ,R2 :tORD ore ean Cine 
16 O15212 612703 17776 MOV #-16.°R3 "16" LINES 
3317 01521 12704 grss20 noy eTERNTE, RY ste TERMINATOR TRACE C téOL, EOP) 
34 bigs So5<0 LOCHAR: IN ‘Sow, ‘ROT END OF ti CHAR. CNTR. 
3321 Gisese 01 obs 177701 LDCHRO: MOV Reet RAR 
g i 3% 11 420 wie: NOV vag Rae + ORD SNe TERMINATOR (EOL EOP EOS 
Bs les Bea me: AINGREPENT LINE NO. OTR 
3926 015250 000207 RTS be NO " EOL-RETURN TO “CALL +4" 
3927 pssst 062716 o00002 R00 82, (SP) YES, RETURN TO *CALL+6° 
3358 13578 ppes95 001622 LDCHR1: TST FCSET1 
a5) pieces eee 4 te 340, (RO) 
Ee 18578 Adesso hatte CLR Page tf 
15276 000401 BR 1$ 
1 nove R1, (RO)+ ;MOVE nSBRe 10.8 FER 
1 1 13: NC BR. VALUE 
1 1 000335 LDCHEB: CMP #335,R1 ; CHAR. var RFLO? 
7 O1531 1003 BNE +10 "= NO 
1831 12701 oo0040 MOV #40,R1 :YES, RESET CHAR. VALLE 
1531 745 BR LOCHRO ;RESET LINE COUNTER 
15320 005037 001622 CLR FCSET1 
3343 Blase et 001620 TST FCSET ;FORIEGN CHARACTER 
3 BNE :YES-IGNOR THIS SEC BN 
3943 015332 12? 000177 CMP Rl, #177 :COUNT ABOVE 472? 
3343 b15338 BL : 'NO.IGNOR THIS SECTIO 
1 12? 000203 CMPB 1, #203 :IF NO FORIEGN CHARACTER SET 
015344 0014 BEQ : THEN T ARE SO 
BLESS gtk Lie A Ie 
1 14 THIS IS THE INTELLIGENTS SECTION 
3949 015354 
1 
te 
3954 015374 
3955 Ol 120127 990237 CMPB)SséaR21, 8237 
2 1 1 ibs oe0213 aa 1, #213 

3958 O15410 00:413 BEQ 

3959 015412 120127 ocoels CMPBSséaR21, #215 


savten Bile DIAGNOSTIC TEST PROGRAM 


1 
3969 tat, 001410 900217 
BlsNes e012? 
a Giese Qlaie OT 
1S4. 1 001622 
5 isig jeoler advele 
13ie8 leOle7 O00214 
3370 Bieies e0ie7 oocea: 
2 boneDe 
3973 pie O0S<01 > 
a Ales Bie SR 
au 
3979 
3981 154 004737 Ol 
ot 12737 1700 C2e4442 
3355 ISI OO23? see 
3985 015516 
eu 
3989 015520 ele 
wa pisese | le 
39933 pt 22sy 5t3 
son isses 31S 
se cise | He 
15530 ele 
Coa 
15532 ele 
: thea Th 
won pies Ble 
4003 15536 ele 
4004 015537 e231 
00S 
O06 
4007 
008 
“019 
le O1SS4¥O 012737 175000 Oe4%442 


ucla Q188s0 Oosoa? equ 


4015 O15554 004737 O170te 
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BEQ 2h 
CMPB sé, #217 
BEQ 
CMPB sé, #255 
BEQ | 
COM FCSETI 
2s: CMPB sé, SVISEOL jCHAR, =VISIBLE END OF LINE” 
BEQ HR sY€S, SKIP 
CMPB —SsdaRX1, BVISEOP :CHAR.=VISIBLE END OF PARAGRAPH? 
BEQ LOCHRe YES, SKIP IT 
CMPB ss: RR, #VISEOS !CHAR.=VISIBLE END OF SCREEN? 
BEQ sft 3NO, 


Rl ;YES, SKIP IT 

LBCHEB 

LOCHE ;RETURN TO *CALL+2’ 

BBHBHEHEHEHEHEHBHHEHHHHHEHEHHHIH HEHEHE HEHEHE HEEB Het 
UBROUTINE TO SET UP A WAIT LOOP TO WAIT FOR VERTICAL SYNC (17 MSEC.). 


RTS 
LDOCHRe: INC 
LR 


HEHEHE HEHEHE HIHEIHIIHEHEHEEHEEHEHEHEEHHE' AHI EEE EEE 


XWAITS: JSR PC TIyENG ENABLE TTY INTERRUPTS 
MOV - 19900 EMP2 
INC 
BNE =" 
RTI 


sFOLLOWING IS A °16’ BYTE BUFFER USED TO TERMINATE EACH LINE OF THE “VT° BUFFER. 


TERMTB: .BYTE VISEOL 
EVE VISEOP 
-BYT VISE 
ya VISE 
BY VISEOL 
-BYTE VISEOP 

BYTE VISEOL 
BYTE VISEOP 
-BYT VERESL 
.BYT VISE 
BYTE VISEOL 
are vieeo 
VTE VISEOP 
BYTE VISEOL 
YTE VISEOS 
VEN 


TO SET UP AN APPROXIMATE °3° SECOND DELAY. THE ROUTINE ALSO 
Y MONITORS DATA 'SW14’ AND IF FOUND SET CAUSES AN INDEFINITE DELAY. 
Preberereremnerttererritintrrterttr erate tiretr ier trstri reer riieie er) 


XDELAY: MOV #175000, TEMPE ;SET UP SHORT DELAY 


XDLAYL: CLR TEMP2 ;SET UP LONG DELAY 
JSR PC, TTYENB “ENABLE TTY INTERRUPTS 


iStonoutine To set uP AN APPROCIRRTE. “s+ SECOND DELAY, "THE ROUTINE ALSO, 


ee BT DIAGNOSTIC 


a O01SS60 012737 
wie 37 


40s? 018630 

4038 

4030 

woes Q1S632 104002 

40 MES eral 

4o35 O1ee40 013702 
15644 20 

4 i264 1 
i 197 

4998 15652 10003 

4039 O1se84 oo00o2 

4040 

4042 

ue 

40 

4O4S O1SES6 104002 

uD4? BLeeEY BiSFRT 
Biees fiSoH 

4049 015674 005301 

4 oie? 01¢700 

utes O18/04 S07? 

woes piesig Bi99e2 

Oss 015722 104003 

4uose 018724 00 

ye? 

yee 

yes 

40e0 

4061 


4071 015764 004737 


TEST PROGRAM 


177777 
024426 
040000 
004000 


24442 
024440 


177700 
024460 


024474 
004374 
000031 

474 


3574 
163572 
000001 


024162 


aeai86 
010000 


024162 
O14E32 


024440 


163522 
163512 


163566 


163350 
024240 
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MOV #-1, TEMP) 
XDLAY1: TST SW ;DISP aie hy MESSAGE? 
BNE 3 YES INHIBIT HOLD 
IT #SW14, dSWR iT ST 


15 turd BELAY 


XDLAY3: INC TEMPe 


XDLAY2: RTI 
FF f-4-4-$-dot-t-fet-tek-t-debeb-5-t-tab-S-ted-de-tp}-t-ta- b-in-ft-S-tn- i ?-toa-t?-+-+-}-tnlababalabalalalalolataiaiaiaialeiateteioiee 


; SUBROUTINE TO LOAD ; BUFFER. 
536363639 HEHE HE HE HE EE EE EE HE HE HE SEHR HE AE HE EE HE SEE SEE HEE EE EE EEE EEE 


XLDLNE: SAVREG ; 
MOV #-64. RI tL Poeb REGS 2uar. BYTES 
MOV KSTORI , Re ;FROM THIS ADOR. 
XLDLNA: MOVB (R2)+, (RO)+ 5 RO" 0 edepe POINTER TO A ‘VT’ BUFFER ADDR. 
INC Ri : FINISHED? 
BNE XLDLNA 3NO, LORD NEXT 
GETREG :YES, RESTORE REG S 


5 RERRSRRAER RARE ALLA LA LALA LALLA ELAS ALES SESE REESE EERE EER AREER EREREEERES 


;SUBROUTINE TO LOAD THE ‘VT’ BUFFER W/ ‘VISIBLE EOS’ CHARACTER. 
Fir rtttiitiitiititiittiititittiitiitiiiittitttittiritititererrererere’, 


XEOSBF: SAVREG ;SAVE REG.’S 
MOV #VTBUFF RO ;SET UP BUFFER ADDR. POINTER 
MOV #2300. .R1 *LOAD °S15°’ DATA WORDS 
nove HE0S, (RO)+ 


MOV aVTRUFF ,RO ;RE-SET POINTER 

CLR aVTCAR :CLR CURSOR ADDR. REG. 
MOV RO, AVTSAR _;LOAD STARTING ADDR. 
MOV #1,aVTCSR ;ST. DISPLAY 

ae 


5 HEHE ME SE MEE MEE 8 J A A HEE SEE SEE EE EE HAH EEEEE 
; SUBROUTINE | wrens AT THE END OF EVERY DISPLAY TEST TO CHECK STATUS 


eons otebcussnesusoebacesennunsncesounseseueucessussecesaossvauceceenens 


THEND: INC DONESW 
XENOT:* DELAYL aoe ENABLE TTY INTERRUPTS 
F ORGaSuN iat NTR AL L tests: 


B RUNEM 
BI #SWil2, dSWR 
B RUNEM 


NE 
MOV DONESW, HOLDSO 
JSR PC, TSWAP 


inenOAL abVANCE SW. SET? 


:SAVE SW. 
:TEST FOR SWAP SW. 
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4072 015770 005737 O24240 TST HOLDSO ;WAS SW. SET TO LOOP TEST? 
4073 015774 001354 BNE XTHEND “YES, LOOP IT. 
4074 1 RTI :NORMAL EXIT 
4 oe 1 RUNEM: DELAYL 
4 1 014632 J PC, TSWAP ;TEST SWAP SW. 
16006 062716 o00002 RUNEXT: Roo #2, (SP) “ADVANCE TO NEXT TEST 
4 78 O1601 ae Bi 
5 RRRERRAKAA AERA RE RARER ELAR EARL AERA ALAA AERA RLS REARS RARE RAR AA ERASE RA LA REAL ESSE SE 
4 sPOWER FAIL HANDLER 
uy 5 LRESSRRSER SELES SELES EL RSRKSRHA THE LKSRREARERRE LAS SAREE RAE AARSRAMEELALELL ALLELE 
4084 O16014 01004 PWRFAL: MOV RO, -(SP) :SAVE REGISTERS ON STACK 
4085S O16016 010146 MOV R1,-(SP) 
01 MOV Re, ~ (SP) 
4087 016022 o1 MOV R3,- 
1 1 MOV RY: -(5P) 
4089 O160e6 O10SH6 Hv RS, - oP) 
03) pips! pi Oea? na ne P’T Pi ; BV STACK POINTER 
000024 v #PWRUP, 824 R UP ROUTINE TO LOCATION 24 
aned pL eOde ibaa 163234 PWRUP si 4 W et NTERR 
dBee Bi BBee BtS poate 7 V HEAR CR + bohieR Bown Met NES TO LOCATION 24 
4096 O16062 012637 op0024 MOV (SP)+, #24 
4097 i Hees MOV ($P)+,R5 ;RESTORE REGISTERS 
4098 1 73 1 MOV (5P)+°R3 
16074 012602 MOV (SP)+;Re 
168 1 MOV +30 
161 1 MOV (5P)+°R 
161 RESET 
016104 005001 CL Rl :POWER UP DELAY 
016106 005201 INC R 
BIStIe Po4g65 Bfenvar 
tetts 303 MES21 
016116 000177 002264 JMP QRETURN 


B-bst-$-5-4:5-4-te-tab-5-tab-+-Set-tal-t thal 5-4 dad tetab-t-5-5-Fylabalelabahalalalalahalalahalalalelalalalaialalalalelalalslaialelabaielebeleisialeleld 
VE ’81-RS’ ON STAC 


SUBROUTINE TO SA 
HHAHEHHBHHE GBH HEHEBHEHH EHH HEHEHHEBHEBHEHH HHH HEHEHE EGHEE HEHE BEER 


SESEESCSESCELESCLELSCELE SCLC 
SSO NeM cwm-ODSBNERN LOWES 


16122 012637 o244s0 XSAVRG: MOV (SP34, , SAVEPC 
16126 12637 De44S2 MOV (SP)+ SAVP Su 
161 12637 Oo44s4 MOV (SP)+; 
016136 012637 d244S6 MOV (SP)+: SAvesd 
16142 010146 MOV R1,-(SP) 
16144 Deu MOV  =( 
41 16146 01 MOV R3,-(5P) 
4122 O16150 O10446 MOV RY; (SP) 
4123 016152 010546 MOV RS. -(SP) 
4124 O16154 013746 OeHHsE MOV SAVESW, -(SP) 
ties 16160 013746 45 MOV Saver, ~ (SP) 
4126 O16164 613746 Oe445e MOV SAVPSW, -(5P) 
4127 O16170 013746 Oe44 MOV SAVEPC, -(SP) 
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4128 016174 900002 RTI 
4129 5 REARELLAA ELAR EERE LARA ERR E EERE ARERR RELA RAL R RAL R RELA RELA LARA LEAL ELLA SLES 
4130 :SUBROUTINE TO RESTORE 'RI-RS’ FROM THE STACK 

HE s RERRALRAAEALALALLALELALELALE LALLA ALE RA ELA RALALAAAAALARAALALAL AA LARA ALLL ASALALLS 
4133 016176 012637 024450 XGETRG: MOV (SP)+, SAVEPC 

4134 016202 012637 de44Se2 MOV (SP)+’5a 

413S 016206 012637 Oo44S4 MOV (SP)+’ SAVePC 

4136 lb2l2 O1e637 O244S6 MOV (SP)+’ Sav 

4137 016216 012605 MOV (SP)+°RS 

4138 O1 12604 MOV (SP)+'RY 

Witd O1ese9 LSEbe MOY CaP aR 

4141 Ol62%6 01505 MOV (SP)+'Ri 

4142 016230 013746 Sb MOV SAV2SH, -(SP) 

4143 016234 013746 O244S4 MOV SAVEPC, -( SP 

ake Biba ELEN BRSE6 RY Shere 

14% 016250 Oo00002 RTI , 

4147 

41 Nee e ea eee eee area eee ee ee eeey neta ertce ute pate pee he feet 
414 : SUBROUTINE TO PRE-LOAD THE ’VT’ DATA BUFFER WITH DATA FROM T 

siti HHH HEE HEH GHB HHH HHH ESE 
4] 1 S077 XPRELD: CLR avT SR. 

4125 bigese Bieva, ABI Oae O: tAW 251 HEY up "siz 

aise bi eoed asat4 ooo002 ADD (SPS Ae BET uP a, OF D me re _— 

41 16270 024474 MOV Sot ocEe RO -SET UP BUFFER POINTER 

08) bieers Oife 20 NOV (Re), (RO)+ iMOVE ,DATA TO BUFFER. 

41 1 BNE 

atea iste rtsati 014431 MOVB #14431 (RO) in nove NT keen We r£0S" 

4161 016306 012700 O24474 MOV #VTBUFF RO RE-SET BU BUEFERY ADDR 

416e 16 le 910077 163179 mov RO, avTS toAg *STARTING BBR. 

4164 ; 

4165 5 Sosaseneweeeneeeeees te ters an na Tt" faViCe Mere 
4166 :SUBROUTINE TO SET UP THE *FK’ AND THE ‘VT’ DEVICE ADDRESS 

Niee eee a eancaneravausctunsuaecesaustauauanstaasdustesdzraeseusseaness 
4 737 024134 T TFG, UNIT’ T TS? 

W980 Blesee Apraig COtsS4 Oe4i36 STUNIT: CHEB NETO NING es TRE-SELECT ONT *0 

a7] 016330 02737 000001 024134 cre ul UNITFG RUNNING UNI 

4173 O16340 0207 37 oo0002 024134 CHP te, UNITFG . x; ee UNIT #2 

4178 Ol B35 020737 000003 024134 CHP 83, UNITFG ;RUNNING UNIT #3 

4177 016360 005037 024134 SETUTO: CLR UNITFG : 

417 O16364 012700 0013 MOV #FKOLDB, RO :NO, LOAD UNIT "0 

4179 O16 12701 00141 MOV #VTOCAR;R1 

4180 016374 O004i6 BR LDUNIT 

4181 016376 012700 001344 SETUT1: MOV #FK1LDB, RO 

4182 O16402 012701 oO14e4 MOV #VTICAR:R1 

4183 O1640E OO0411 BR LDUNIT 


en 


LO6 
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4184 016410 012700 001360 SETUT2: MOV #FK2LDB, RO 
418S O16414 012701 001440 MOV BVTECAR, ,R1 

4] 164 BR 

4189 Ole426 013701 OOLaSM ae pee a 

4] 164 pisz es tis LDUNIT: MOV aFK LOB, Re 

4190 016436 012703 001504 MOV 8VTCAR: RS 

4191 016442 O01 SETFKA: MOV (RO)+, [R24 

4] 16444 gh MOV (RL) (R D4 

4] 16446 001504 CMP KLvi+2,R 

4194 D1bYSe 001373 

4195 016454 000207 RTS 

41% SUGROUTINE ENTERED ON A! ILLEGR: TRIP’ Tie ROTUIIE RePone cae 
4197 ; SUBROUT INE ENTERED ON AN I LLEGALT THE ROTUINE REPORTS WHERE IT 
4198 :T "FROM? AND WHE FRAPPED TO’. IF NO TTY 15.8 VAILABLE 

4199 ?A HALT’ IS EXECUTED. ¢ IME USER CAN EXAMINE THE *FROMPC’ 

4200 *LOCATION AND THE ’TOPC’ LOCATION TO TRACK DOWN THE 

4201 sceanusonenstupebabprndeabesnesennetepeesnatenosacbenensnieennenecnenee 


16 ooo005 ERTRAP: RESET ;CLEAR ALL FLAGS 
404 pT eee 104022 NULL 
4205 016462 000240 NOP 
4206 O16464 011637 O2e41S6 MOV (SP), TOPC ;SAVE LOCATION WHERE IT TRAPPED ’TO’ 
4207 bibs Decbet POP2SP 
4208 O16472 O11 024160 MOV (SP) .FROMPC ;SAVE WHERE IT TRAPPED FROM 
4209 O16476 162737 000004 oe4156 SUB 4, TOPC 
4210 O16504 162737 O00002 024160 SUB i FROMPC 
4p] beS12 005737 024154 TST TTYSWH ;IS TTY AVAILABLE? 
4212 01651 1001 BNE i ry 
4213 O16 000000 HALT “NO, HALT 
usts {pe54 aes eae TEXT "ILLEGAL TRAP’ 
4 ie 13 FeGaTe Mita ; 
4217 016530 024156 TOPC ;TYPE ’PC TRAPPED TOO 
4218 016532 104012 PRINT 
4 16 2150 MES6C TEXT *FROM’ 
4 16 104014 PRTOCT 
4221 016540 024160 FROMPC ;WHERE IT TRAPPED FROM 
ieee 016542 000137 o02s26 IMP MONITR RETURN TO THE MONITOR 
4224 ; RRRRRERAAAAARKAAAAALAA ALA AA LALLA LALA LE LE AAS SA LES ES RE EA ALAR SAAR AARERAREELELLLE 
yoo5 *SUBROUTINE TO PRINT THE DECIMAL VALUE IN 
uss 1GHGEHEHHHHEHGBH HEHEHE HAHEI HHH HGH HHH GEER EE alate 
4228 O16546 005077 162540 XBINDEC: CLR  aPSW ;ENABLE INTERRUPTS 
4229 O165S2 042702 160000 BIC #160000, Re 
4230 O16556 012737 177774 oO166S2 MOV 8-4. R3PBT 
4231 O16564 012704 016642 MOV #DECPNT, RY 
4 Es 165 12701 17777 TYPT1: MOV #-1,R1 
4233 016574 01 TYPT2: INC 
4234 016576 161402 SUB (R4) Re 
453 Oieede M BOOED RE 
4539 OL 04 737 016620 ISR Pc, DECOUT 
4238 016610 37 Ol66S2 INC p 
4239 016614 001365 BNE TYPT] 


en 
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4240 016616 000002 RTI 


4241 016620 005701 DECOUT: TST 
4 1 BNE DECI 
& 000060 MOVB #60, (RO)+ 
4 1 RTS PC 
16632 152701 000060 DEC1: BISB  #60,R1 
4 1bb36 MOVE R1, (RO)+ 
tga? 1 RTS PC 
4249 016642 001750 -  DECPNT: 1000. 
‘ Lee 4y 100. 
153 16652 0000 R3PBT: .WORD O 
ise? 5 RERAAAALA EASA LALLA EERE LEELA RESELLERS ERE R REALE R RR AE LALLA EERE LEL ES ESS 
4 ;SUBROUTINE TO SET UP ’FK’ VECTOR ADDR. & INTR ENABLE 
sea ; RERRRARAAA LARA REAR L ARRAS EERE EEE ERE R ESSE EERE ESS 
4259 O16654 017677 O00000 162616 LDFKVT: MOV Q(SP),aFKINT | ;LOAD INTR SERVICE ADDR 
i528 pt eees pee, Bt a #2, (SP) 
eh el 
uses oie ops077 1 Bi i, , ;ENABLE INTERRUPTS 
4eb5 sOAMITIa TD MeaET rk? VECTOR mmreare TD at me inner ee 
Hebe “SUBROUTINE TO RESET ’FK’ VECTOR ADDRESSES TO HALT ON INTERRUPT 
4 ETESESSTESTEOSTISTST TESTES TESST TST STCTEC TSS OTTTETTTETT SSCL OT OCTS TST ESTEE T 
4268 016710 012777 000340 162374 ALRFKV: MOV #340, oP 
W268 ot 716 1e772 pg0012 16255 MOV #12, aFKCSR 
4 167 13777 001 16254 MOV. FKLYL, aFKINT 
4271 016732 005077 162544 CLR aFKLVL 
127 016736 000207 RTS PC 
ist 5 RERRALALAA SEARLE EERE ELEL LER AERA RELA E REL RELA RRR ESA LALERRRAE ALLE RAE AELLEE 
475 *SUBROUTINE TO LOAD ’VT’ VECTOR ADDR. & INTR ENABLE 
mt HHH HHH HHH HHH HIGH HHH Ha aia ae 
4278 016740 017677 OOOD00 162546 LDVTVT: MOV Q(SP),aVTINT  ;LOAD INTR SERVICE ADDR. 
4598 BT eae aaa 000002 ADD #2, 
4280 - 016752 012777 OO0240 162536 MOV #240, OVTLVL 
4og b16760 e772 000101 162522 BIS ze3t 1; aVTCSR ;SET 'GO’ & INTR "ENABLE’ 
4 167 077 1 L 
uggs 016772 000207 RTS 
4285 5 RRRAA MEERA EERE RAH EERE EE LEE REE ALE RARER EERE EERE RERE REE AREAL EE EEE 
486 *SUBROUTINE TO RESET *VT’ VECTOR ADDRESSES TO HALT ON INTERRUPTS 
m3 UBHBHHEHHEHEHHHH HHI HBHHHEHHEHGHGE HEHEHE El Ea iat eae 
4 12777 340 162310 CLRVTV: MOV 
4588 17002 pass Spoor tp5248 Ste fol OOO RCSR 
4291 017010 013777 O01S16 162476 MOV vive aVTINT 
4292 017016 005077 162474 ~ CLR OVTLVL 
4293 022 000207 RTS PC 


ee ree ee: ee ee ee eee 
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en eI ee ee de el OD ee el 


Bagees Raa 


O00 0000000 


005737 


014600 
017200 


000701 
154765 


002526 


024146 


ocoode 
024146 


162216 
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; SUBROUTINE TO LOAD THE ’FIELD’ CONTROL WITH THE ’4’ MODES AND SET UP 
Nee eda dalalalelalalealalalalalalele 


XSTLNE: MOVB #BLINK, (RO)+ ;LOAD BLINK’ 
NE ;LOAD LINE OF 'BLINKING’ CHAR’S 


#BOLD, (RO)+ 
LDL INE ;LOAD LINE OF *BOLD’ CHAR.’S 
v #BLANK, (RO)+ 
LDL INE sLOAD LINE OF ’BLANK’ CHAR.’S 
V #UNL INE, (RO)+ 
LD. NE sLOAD LINE OF ’UNDERLINED’ CHAR.’S 
#CLRFLD, (RO)+ 


RTI 
Py i L-d-4-dct-4-heh-dut-d-tab-t-3-b-tok-+-toh-doh-t-Solad-}-iod-igh-t-tod-4-4ah-talod-tet-tal-}-ied-+-taled-ie}-4-tul-teleleloleloleieleieieieiaieieie 
sSUGROUL 1 Test IF A TTY IS AVAILABLE, AND IF SO, ENABLE 
;KEYB NTERRUPT 
1 EHH HHH HEHEHE HHH III IIa 


TTYENB: TSI TTYSHH iTIY BVATLABLE? 
a ids, aTKS Mes, ENABLE TTY INTERRUPTS 
RTS 


squevccuquanssenenaenneesee sw. 


i SUBROUTINE £10 WAIT FOR AND ASSEMBLE CHARACTERS INPUT 


eae SLUEAAEESOEEERESESONSEA EA ESSS92 0400000000008 0000 HOEEEEEEEEEEIMEEEEEAE 


XASEMB: TTYIN T CHAR.’ FROM Y 
nov #INBUF , R1 Ea T OP ci RoW KE Baer RO eR 
JSR PC, STRIPN RIPE NO 
XASEM1: MOV RY RETURNS HERE IF ONLY *1° NO. 
CMP aie R3 
BEQ WHY 
CMP #154765,R3 
BEQ +4 
RT 
PRINT 
MES19 
BR XASEXT 
WHY: or 
XASEXT: bia MONITR 
WORD2: TST cRL)4 ADVANCE POINTER PAST COMMA 
RY 
ASR RY 
C CHRCNT DEC. CHAR. CNTR. 
BEQ XASEML COMMA LAST CHAR. ? 


Be ep) Ms sae ish TO EXIT 
STRIPN: CL R4 
TST CHRCNT ;WAS ANY DATA INPUTTED? 


oer he DIAGNOSTIC TEST PROGRAM MACY11 27(732) 16-FEB-77 09:54 PAGE 79 


AD.P11 
4352 017206 001001 BNE +4 sYES, PROCESS IT 
4353 017210 000207 RTS PC NO “RETURN 
4354 017el2 Oee711 oo00s4 CMP #54, (RL) He =C¢ 
4355 017216 001756 BEQ ‘YES, SAVE IST NO. 
4 g17200 Overt 177770 BIC #177770 (R1) NO, STRIPE NO. TO OCTAL 
4357 017224 104 ADD +.R4 
4358 017226 005337 O24146 DEC Ghae ent ; FINISHED? 
4359 017232 00300 BGT ~ +4 : 
4360 017234 O00e RTS PC YES, EXIT 
4361 017236 006304 ASL R4 
4362 017240 RY 
4363 017e42 006304 ASL RY 
4364 017244 000756 BR STRIPN+2 
4365 5 RERERRAAAL RE RAAAL LEER LEAH REALL LARA LE LEAR LL AERA LARA LEAS LAL ESE RRRLL ELE RE 
4366 :VT MESSAGE ROUTINE ENTERED VI VIA_EMT DISPATCH HANDLER. 
4367 *ROUTINE PICKS UP CONTE THE ’PC’ AND USES THIS AS 
4368 : SAGE TO BE DISPLAYED. 
1355 SENSES SEEROUSATESSSSESESONSOGES SINS SS;0ESESESESEREGHLEOOEEEEOSEEESEORELESS 
4371 017246 004737 017062 VTMES: JSR PC, TTYENB ; ENABLE TTY INTERRUPTS 
4372 O17ese 005077 162232 CLR - avtcsr *G0’ 
4374 017 Area 000000 O24466 MOV 3(SP) .KSTORY ee, nESSACE RODRESS FROM STACK 
4375 017266 011637 024130 acta MOV (Pe BVECT CTR LL OUR. 
4399 i700 beSei6 fippsas ee aes eee uP STACK oie “SIR 
4378 017304 104002 SAVREG 
4379 017306 013702 Je4466 MOV KSTOR4, Re 
4380 017312 iee7l2 O00100 VTERA: CMPB #100 (R2) Jes) FOR 'a’ 
4381 017316 001007 BNE VTERI *BRANCH IF NO EQUAL 
Ss Ss RE comes Gee? ois EP BiSeLAY Bu 
uaa O17386 t0N020 aerayL 
4385 017330 005037 oce44e6 CLR DISPSW ;CLR DISPLAY SW. 
4386 017334 o00002 RTI s OTHERWISE, EXIT 
4387 017336 27le ooo04s VTERI: CMPB #45, (R2) spe FO 
4 1 14 BEQ VTCRLF IF = FORE TOR-LF? 
4389 017344 112220 VTER2: MOVB (R2)+,(RO)+ :SAVE CHAR. IN BUFFER 
4390 017346 000761 VTERA 
4391 017350 112720 oo0012 VTCRLF: MOVB #12, (RO}+ ;SAVE ’EOL’ IN BUFFER 
4392 017354 105722 TSTB ss (Re S+ INCREMENT BUFFER 
4333 017356 000755 BR VTERA 
4395 (JOH HH EHH HEHE HEHEHE EHO HEHE EEO HER HEHEHE GEE 
4396 :SUBROUTINE TO TRANSMIT A NULL’ CHAR. TO THE PRINTER. 
uae FT rrttriitirtt iti iit iiit titi titi iti ttt itiiit tit itttitiititt titi eey 
4399 017360 O0S037 014326 XNULL: CLR SPACEX 
017364 105237 014326 1$: INCB SPACEX 
4401 017370 100375 BPL 1$ 
017372 012737 o00002 014326 MOV #2, SPACEX 
017400 004737 017436 JSR PC’ TSTTPS , 
4404 017404 005077 1617le XNULL1: CLR aTPB ; TRANSMIT A NULL CHAR. 
4405 017410 004737 017436 JSR PC, TSTTPS 
4496 017414 005337 014326 DEC SPACEX 


4407 017420 001371 BNE XNULL1 


satan Bir” DIAGNOSTIC 


4463 


PRR ee 


oi 


OND DO OOO OO0O0O0O0000 
— 
£oO 


Dt be be b= bh 2 hh pe pe 


a 


6 
017612 


105237 
100375 


10S777 
is 
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014326 
014326 


161656 


024154 
009200 
161636 


024142 
020404 


161760 
161786 


161600 


024154 
16i56C 


024142 
020404 


Boag 


1617 
16170 


162026 


O07 
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2s: INCB SPACEX 
BPL es 
a SPACEX 
RTI 
TSTTPS: TSTB @TPS 
as a 
7 JHHHHEHHEHHHBHHEHHEBHHBBHEHHHEHHEHHHBHEBHEBHHEB HEE HHH HHH EEHHEED Sie 
ENTERED WITH SYSTEM TRAP ’TRAP’ CALL (ERROR) FROM THE ’FK’ LOGIC TEST 
; THIS ROUTINE SETS UP REGS ’RO-RS’ WITH DATA 
;FROM THE *FK’ LOGIC TO BE EXAMINED ON 4 sed IF AN *FK’ LOGIC ERROR IS 


DETECTED AND NO’ TELEPRINTER IS AVAI 
eTertrrittiitrerttiittitittrtittiiitttitttttttitittiittttititt testi tte 


FKERR: TST TTYSWH :TTY STtPe Eason 
BNE YES T 
BIS #AUDIO,aVTCSR ISSUE BeeP ON ERROR 
rst SWR TEST IF mulse IS SET 
KHALT ;NO, INHIBIT ERR wtf 
MOV TSTNUM, RO :SAVE TEST NO.’ RO’ 
HOV SCOPEF ,Rl :SAVE PASS COUNT 
HOV (SP) R2 ;SAVE "ERROR PC’ IN ’R2’ 
MOV aFKCSR,R3 ; SAVE sEK CSR’ IN 'R3’ 
MOV aFKDATA, RY *SAVE °FK DATA’ IN RY’ 
CKHALT: TST aswR : CHECK aS SWIS IS SET 
BPL +4 ?N 
HALT YES, HALT 
RTI 


De eg eh i ae i a ae ge ppc 

ENTERED WITH SYS AP’ (ERROR) FR * LOGIC TEST 

THIS ROUTINE SETS UP REG’S ’RO-RS* WITH DATA FROM THE WT? LOGIC TEST 
XAIMNED ON A ’HALT’ IF A ’VT’ ERROR IS DETECTED AN ‘NO’ TELEPRINTER 


-TO BE of 
:1S AVAILABLE. 
STE rier tti Titi TT tti ti tii titi ttt ttititiitittitititttttttttttttttttitt ey 
VTERR: TST TTYSWH TTY Y AVAILABLE? 
BNE TYPVTR ORS 
TST asWR i TEet IF SwiS IS eRe 
PL: CKHALT+4 NO, INHIBIT ERROR HALT 
SAVREG :SAVE REGISTERS 
MOV RO,R3 : SAVE SHIFT COUN UNT 
NOY naa RO I t Po. 
MOV SCOPEF;R1 ‘Sie Ee alk ING es! 
INC R1 
MOV C$?) Re ;SAVE ’PC’ 
Tal SH T ;RUNNING SHIFT TEST? 
BNE VTERR1 iYE 
MOV avTc RB SAVE CONTENTS OF ‘CSR’ 
MOV VTMAR, RY be CONTENTS OF THE ‘MAR’ 
BR YTERR2 


Low] 
OF 
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wee 017614 017705 161672 VTERRI: HOV. AVTMAR, RS : SAVE CONTENTS OF ’MAR’ 
: Givese N03 * eres Hest TORE REG: "8 
wee 17624 000002 RTI sE 
; SUSRSERERSDENERERPRRERSRAESEPRSRSSRERS RS ERSR SPEARS ARRON ARES EO RES TEES 
a $3 ‘ENTERED WITH SYSTEM TRAP ’TRAP’ CALL ( ) FROM THE ’FK’ LOGIC TEST 
4471 ; THIS ROUTINE IS USED TO PRINT OUT THE CONTENTS OF THE ’FK’ REGISTERS 
472 A LOGIC ERROR I CT 
mall PereMerstrter eer pert ert ert ttt eer terre Tet TTT TTT TTT TTT TTT TTT TTT TTT TT 
4475 Ol 12737 0223 0166 TYPFKR: MOV 13,ERRMES  ;SET UP TO PRINT LOGIC RROR HEADER 
uuse BIZeSa pisos pasos | BSa4a MOV ta tee SST UP TO PRINT ° 
4477 017642 1 001474 MOV weKceR 
4478 O17646 011637 O2c4464 MOV (SP) ReraR3 :PC OF FAILING ROUTINE 
4479 917652 004737 020129 JSR PC, PRTERR *PRINT ERROR DATA 
#480 017656 000137 017520 JMP CKHALT EXIT 
4482 SENTERED WITH SYSTEM TRAP TRAP’ CALL (ERROR) FROM THE °VT’ Logic Test 
4483 ‘ENTERED WITH SYSTEM TRAP ’TRAP’ CALL (ERROR) FROM THE ’VT’ LOGIC TEST 
wed ; THIS S ROUTINE 1s USED TO PRINT OUT THE CONTENTS OF THE *VT’ REGISTERS 
waa? SRE EE LHS HEE HaHa aEHEH HaHa aEE ee 
Cee BLESS AOE couse TPT SEWMEC ogg, ev PEGE, STH 
44 Bt eed ae Bea VTNORM BeBORT T 8S NORMAL ERROR 
4491 017672 005737 oce444E TST MESPTI Typed HEADER 
wes OTF 50B ppeoa? O24446 its weer sie 
4494 017704 005037 Oo4444 CLR MESPRT 
W435 017710 012737 022571 020166 mov AMES? ERRMES See Set chiar HEADER 
uua? Bio7ee BtpTae | AS44og MOV ORY KS TOR E EXPT 
4498 017726 012737 OOO00l oce444O MOV #1. TEMP! PRINT at Bata WORD 
usoa Bi77ae pue7oF Be. Yin 
177 000100 161544 VTNORM: BIC #100, aVTCSR ;CLR 'VT’ INTR ENABLE 
4501 017744 012737 022526 O20166 MOV #MESIG6,ERRMES :SET UP TO PRINT LOGIC ERROR HEADER 
4502 017752 012737 OO0002 Oe4440 MOV #2 TEMP -SET UP TO PRINT ‘VT’ REG’S 
4503 017760 012701 001510 MOV #VTCSR 
4504 017764 011637 O2e4464 VTOUMP: MOV (Sp) Pahl a3 :PC OF FAILING ROUTINE 
4505 017770 004737 020120 JSR PC PRTE RR *PRINT ERROR DATA 
4506 017774 032777 Oe0000 161322 BIT Sng :1S PRINT INHIBIT SW. SET? 
4507 ge00ge 001043 BNE EXTV i 
4508 005737 o2443e2 TST SHF DOING SHIFT TEST? 
4509 020010 001414 BEQ aE THAR sO 4 SET AND I YPE “NAR 
4510 O20012 013737 o2e4472 oe44o4 MOV KSTOR6, KSTOR3 iy T UP TO TYPE SHIFT COUNT. 
4511 O20020 004737 020236 ISR PC, XPRTA SHIFT 
1318 ge0ge4 adele PRINT ‘PRINT IF DATA ts SHIFTED IN OR OUT 
4514 020030 013737 O24470 oo44E4 ” MOV KSTORS,KSTOR3  ;SET UP TO TYPE EXPT’ D DATA 
4515 020036 004737 020236 JSR »XPRT : TYPE ie TD DATA 
4516 Oe0042e O32 000097 161254 GETMAR: BIT #7" JSWR ARE T SELECT BITS SET? 
mth ae Sabaae 000017 161430 ae 4g ies, Per THE MAR’ 
4519 BSODES 017702 161240 MOY aSWA, Re ead 'MAR’ ADDR. FROM SWS 
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SUCH Aaa ee ees nats 


£ 


mY 
f 
o 


020270 


177770 
18h] 

020236 
017520 
020462 
020270 
020000 
oo00de 
000100 
024444 


24444 


020404 
024442 


024464 


024440 
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BIC #177770,Re2 
ASL Re 


TCSR :SET LECTED "MAR REG. 
TYPMAR: Bae RS THAR Re TORS ach allan rene - 
JSR PC, XPRTA Ate the 
EXTVTR: Ae Res >REST RENT STERS PRCM TACK. 
IMP CKHALT EXIT 


eesti irtititi tt iteritisiiititeitiiitiitttitiiitittitiitstrtirere 
ow US TO PRINT OUT ERROR INFORMATION ON °FK’ & ‘YT’ LOGIC 


"HHH HHH HHH HHH HHH HEHE He 
PRTERR: TST XORFLG 
BEQ - +6 


INC XORHLT 
BIT #20000, 2SWR ; TEST SW-13 FOR INHIBIT PRINT OUT 
BNE EXTPRT : INHIBIT,CHECK FOR HALT 
SUB #2. KSTOR3 
BIC #100, aFKCSR ;CLR °FK’ INTR. ENABLE 
TST MESPAT “HEADER BEEN TYPED? 
BNE .+12 ‘YES, 
PRINT 
ERRMES: 0 :PRINT LOGIC ERROR HEADER 
INC MESPRT ?SET PRINT INHIBIT SW. 
PRINT 
CRLF 
PRTOCT 
ST ;PRINT FAILING TEST NO. 
SPACE 
MOV SCOPEF , TEMP2 
ARF oct — 
TEMP2 :PRINT THE FAILING PASS NO. 
SPACE 
BR XPRTA 
XPRT: MOV (R1)+,R2 
MOV (Re) ,KSTORS 
XPRTA: PRTOCT 
KSTOR3 
SPACE 
DEC TEMP 1 
GT XPRT 
EXTPRT: TST XORHLT 
BEQ 1$ 
PRINT 
MXORH 
T 
1S: RTS PC 
XORHLT: 000000 


FOR EACH LOGIC TE 


5 REAL ARRARRAS REALL RAS SAA RELA ARA AE REL ARE RE ARAL AAA RE RAAELA AAA RL ALA RAARE 
;SCOPE AND/OR ITERATION LOOP ST 
5 RERRLARRRLEASALA RAL AAALA SALA SAA LAAAA ALARA RA LASAA SALA LAALLARELARLLERAD 


- 


f 
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4576 104017 SCOPEC: TSTTKS ;CHECK FOR 4 KEYBORRD FLAG 
4577 777 O40000 161022 IT #49000, aSHR 7 T 4 FOR SCOPE 
me se 020462 S XORFLG :SEE IF RUNNING WITH XOR 
Bse777 004000 161004 SCOPI: att #4000, aSWR NO-TEST SW-11 FOR ITERATION 
1013 BNE Scopes S INHIBIT ITERATION 
023737 o20404 o20402 CMP SCOPEF,ICOUNT  ;COMPARE CURRENT COUNT TO MAX NUMBER 
Sees gapuo4 PNE Os RCOPEF SPAT DONS COUNT 
022606 SCOPEB: CMP (6)+, SP “REPOSITION STAC 
012677 160746 MOV (6)+, aPSW jRESTORE PREVIOUS PROCESSOR STATUS 
77 3% IMP JRE TURN *REPEAT TEST 
350 005037 d20404 SCOPEG: CLR SCOPEF :CLEAR COUNT 
11601 MOV a9P Rt :SAVE TEST NO. 
1 17 14, (R13, TSTNUM 
ADD #2 (SP en 
020406 MOV aSP, RE SAVE SCOPE RETURN POINTER 
o00200 161116 BIS saUbTD. STCSR : TSSuE "AUDIO BE cep ON. ENO OF TEST 


count: 300 iPFERAT rant count 


SCOPEF: 0 ;COUNT LOCATION "For ITERATION LOOP 
RETURN: FKT1 
; ###**BEGINNING OF XOR TESTS 


eee 


BAAS AA AAS Creer rt tae 


013746 oo0004 XORT: MOV ae4 (6) Save CONTENTS OF LOCATION 4 
012737 O04 34 co0004 MOV SXORERR. 284 TYP FOR T NE OUT 
727 | TST TIMES OUT IT DETECTED AN ERROR 
012637 oo0004 MOV (6)+. 84 iI TIMEOUT-RESTORE LOCATION 4 
BR SCOP jE TURN 19. Test 
XORERR: CMP (6)+, (6)4 LEAR STACK 
I oooco4 MOV (6)+, 084 REST LOCATION 4 
000001 160654 BIT #1, aSWR § ;:RING BELL ON ERROR? 
1402 BEQ 13’ ?IF NO, SKIP AHEAD 
104012 PRINT :SEND BELL 
4610 023750 MBELL 
461 000177 177724 1$: IMP JRE TURN 
461 090090 XORFLG: 000000 
Weta 
4615 ° 5 RRRKALAARRREASRAAA LARA AA SAS AAA AA SA RA AA LALA SAAR SAARAARALARSAAELAARAERER 
4616 :KEYBOARD CHARACTER TABLE 
4617 5 RERRLERRRA EE REALL A RARER LAER ARE RALE SARE REAALA SSR AAA AAERERRALLSAE REESE 
4618 ;START, TOP UN-SHIFTED 
4619 O20464 l CHRTAB: .BYTE ’[ 
4620 020465 061 “BYTE °1 
Mat O46 Be EVIE § 
4623 020470 06 "BYTE °4 
4624 020471 O65 “BYTE °S 
04 O66 "BYTE °6 
o4 067 "BYTE '7 
0474 070 "BYTE °8 
4628 75 071 “BYTE °9 
4629 020476 060 “BYTE ‘0 
4620 020477 oss BYTE ‘= 
463i d20s00 137 BYTE ‘e 
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OBYT 


2 
foo 


ee 


R 
Ht 


pec 


-|O0K—— ere 
Id LOOSS 


ae 


Oe0Ss4 


13S 


146 


-BYTE 


*"] 


;@ND ROW LOWER CASE 


ll 


-BYTE ‘°t 
BYT 141 
.BYT 144 
-BYTE iM6 
-BYTE 147 
.BYT 150 
.BYT 1S2 
-BYTE 153 
-BYTE 154 
BYTE vs 
.BYT *s 
-BYTE 177 
;4TH ROW LOWER CASE 
.BYT 17 
‘Bye 158 
-BYTE 143 
-BYTE 166 
YTE 142 
-BYTE 156 
-BYTE 155 
Cy ee 
. BYTE ° . 
YT a 
.BYT *~ 
.BYT 40 


;START OF 'SHIFTED’ PASS 


UPCASE : EVE 


173 
om 


° 
see 


® 


fia 
+ 


MODE 


- DORMC <H+HDME OD —- 


or 
x7 


T—RAaxoOonowDYD 


wees er ee as ee os es ee 


;RUBOUT 


=22O0<oOmKN 


; TERMINATE W/ SPACE 


;LEFT BRACE 


¥720 sYsren DIAGNOSTIC TEST PROGRAM 
DOBYTAD.P11 


020SSS 
020SS6 


043 


OBL B SRE 


ps 
o— 


DOR Re me OO 
ORE PRR SS 


ee 
uno 


INO EOWSVREOLS 


— (IO eb ee 


ReRRBBR 


Q 
2 


MACY11 27(732) 


;2ND ROW 


;3RO ROW 


:4TH ROW 


- 


é 
16-FEB-77 09:54 PAGE 8S 


-BYTE °*@ 

-BYTE '°§ 

.BYT *; 

.BYT "8 

% Y °° 

BYTE °C 

.BYT ma 

.BYT’ *0 

.BYT °s 

BYTE ‘+ 

BYTE 175 ;RIGHT BRACE 
*SHIFTED’ 

.BYT ll 

BT 33 ; ALTMODE 
-BYTE ‘°Q 

.BYT Wl 

.BYT 4 

.BYT . 

-BYTE °‘T 

BYTE '’Y 

BYTE °U 

BYTE °I 

BYTE ‘0 

BYTE ’P 

BYE iz. LE 
BYTE 15 *CR’ 
*SHIFTED’ 

-BYTE 176 3° 9" 
BYTE ’°A 
, tek 
.BYT *D 

.BYT *F 

-BYTE °G 
-BYTE °H 
-BYTE ‘J 
-BvTE ’K 

.BYT *L 
os 

BYTE 177 ; RUBOUT 
*SHIFTED’ 
Ae 6s 
-BYTE °X 
-BYTE °C 
-BYTE °V 
-BYTE °8 
BYTE *N 
-BYTE °M 


- 
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4744 020634 076 .BYTE *) 

4745 020635 077 He: 8 

ara? BBoEs? > G80. ‘BYE 40 ; TERMINATE W/ SPACE 
449 | START OF *CONTROL’ PASS 

4751 020640 033 CONTRL: .BYTE 33 ste? 

4752 020641 061 ‘BYTE °1 


4756 020645 065 BYTE °S 
4757 i 0&6 Y ‘8 
4 064 7 YT 
4 SO YT 8 
4760 020651 071 oo Gee 
4761 betes 0&0 -BYTE ’0O 
0206' 015 CNTRIT: .BYTE 15 
ue 020654 037 -BYTE 37 s*te’ si 
mt 020655 BYTE 35 :*t’RIGHT BRACKET 
4756 32ND ROW *CONTROL’ 
476 
O206S6 O11 vs 11 eee 
i Bete Be An 
477 1 7 -BYT e7 3" thi’ 
4772 O20b62 00s -BYTE 05 :* te’ 
477 a 5§ 3 $0. 
.BYT 5°? 
4775 l -BYTE 31 has 
4776 O2O66E 025 -BYTE 25 tu 
4777 7 Oll -BYT ll oa 
ne 017 -BYT 17 :°t0’ 
47 71 020 -BYTE 20 3° oP’ 
4780 O20E72 000 -BYTE 00 ;*ta’ 
4781 020673 Ole - BYTE 16 ;°LF 
ares 0206 015 -BYTE 1 ;’CR’ 
aye ;3RD ROW *CONTROL’ 
4786 020675 036 -BYTE 36 9*7* 
mt tage noe gM a 37th’ 
701 006 BYTE 06 3° tF* 
| de070e ae ! BYTE a7 ; ‘ 4.3 
47 B50704 Bi BYTE 1 ity? 
4794 020705 013 .BYTE 3° tK* 
47 020706 014 -BYTE 14 te *y 
47 ae ns , 73 as 
473 710 7 .BYT 7 wh 
0711 1 -BYTE 177 3° t*RUBOUT 


? 
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4800 ;4TH ROW *CONTROL’ 
4 1 .BYT 3742" 
5k & or x Bi 
4804 020714 -BYTE 03 3° 9C’ 
4805 020715 026 -BYT 5s ;*tv’ 
SF Bes BH Bis 
1 1 -BYT 16 tN’ 

4808 020720 015 -BYTE 15 +m’ 
4 7 4 -BYTE °, 

19 : YT ° 

it 7 -BYT. 7 
481 7 034 -BYT 
aia 020725 040 CHREND : y 40 ;SPACE, ’DONE’ 
4815 5 HHH HE HEHEHE SHEESH 
4816 ;°VT’ SHIFT DATA TABLE USED BY ’VT’ LOGIC SHIFT TEST 
aie ; THIS BUFFER IS SHIFTED IN 2 PASSES (64 TIMES IN ALL) TO TEST THE 


ee pate ra OHS ToS Je coRPRGD, fo Tee COUTTS oF De ate 
: SS REGISTER. THE Fs COMMENTED IN OCTAL AND RE REFORTED Din 
OCT THE LOW BYTE OF EACH SHIFT ISA CONTROL FIELD CHARACTE 


HBHHEHBHHEHEHHE HEHEHE HBG HEHEHE HEH EHEHB HEH HEHEHE 


SSRRRESERAE 


? 360 SHFTBF: .BYTE 360 

? 040 "BYTE 40 ;SHIFT "1" OR ‘41° 
4827 020730 361 -BYTE 361 aan Ahad 

020 2 Ou} MT 4h ;SHIFT °2° OR ‘42 

4830 042 "BYTE 42 ;SHIFT °3° OR °43° 
ues 3 3 aoa BYTE a SHIFT 4’ OR *44" 
Hie fb 

? 44 "BYTE = 44 ;SHIFT *S’ OR ‘4S’ 
4835 020740 363 -BYTE 363 
ie ae ae : NT nm “ ;SHIFT 6’ OR ‘46° 

74 O46 -BYTE 46 ;SHIFT '7° OR *47° 
apse rae 047 BYTE 38 ;SHIFT '10’ OR *SO° 
woue ad aco BYTE 20 SHIFT "11° OR °S1° 
4843 020750 373 “BYTE 373 F 

pen7el O61 ’ MT bh. :SHIFT *12° OF *S2° 

4846 020753 072 ‘BYTE 72 ;SHIFT °13° OR °S3° 
4847 020754 377 .BYTE 377 
deg ‘ \T 107 ;SHIFT °14° OR *SH" 
4850 020757 106 ‘BYTE 106 ;SHIFT "1S" OR 'SS° 
4851 020760 372 ‘BYTE 37 
4258 175 : i ? ;SHIFT ‘16’ OR *S6’ 
Ay .BYT 74 


4854 020763 123 -BYTE 123 ;SHIFT *17° OR °S?° 


oe hoe) 
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Ss ONS = 1? BYTE 137 ;SHIFT *20’ OR '60’ 
48 me? oi? BYTE 177 ;SHIFT '21’ OR ’61’ 
4gs 360 -BYT 
4 77 -BYT ;SHIFT ’22’ OR '62’ 
4861 376 -BYTE 376 
W862 020773 2237 -BYTE 237 ;SHIFT *23° OR '63’ 

774 74 -BYTE 374 

77 -BYTE 277 ;SHIFT "24" OR ’64’ 

4865 7e -BYTE 372 
4 777 -BYT 3 ;SHIFT '25’ OR ’6S’ 
4 1000 -BYTE 366 

1001 2 -BYTE 235 ;SHIFT *26’ OR '66' 
4869 021002 360 -BYTE 360 
4870 rata Me 40 ;SHIFT °27’ OR '67" 
472 2100s 1 ‘BYTE = 41 ;SHIFT °30’ OR *70’ 
4873 021008 363 BYTE 363 
Nery Ge1007 = O43 BYTE 43 ;SHIFT °31* OR *71° 
a8 OB 1011 a8 ‘BVE 4 ;SHIFT °32’ OR '72’ 

101 4 -BYT 4 
4878 021013 7 BYTE 47 ;SHIFT °33’ OR '73’ 
4890 rat BEB ‘BV ep. SHIFT "34" OR '74’ 
veel Geldle © Se ‘BVT | 
4ege 21017 = 970 -BYTE 70 ;SHIFT °35’ OR *75’ 
4B84 G31 8 ‘Be 7 ;SHIFT °36’ OR *76’ 
yess 21022 370 -BYTE 370 
4e8e Gei0e3 =e aaa, “En. Ue ;SHIFT °37° OR '77° 
“B8 Bet 1 ‘EVIE | 3f ;SHIFT "40° OR *100’ 
m2 5 RERRRLARRLAA REALE ERAGE E ERE A AERA EERE RAE EEAEA RARER RARE ER AREL ARREARS 

;MESSA 
4 5 RERRELRR ALLER AE LE ERLE RE ERE ELLA AAA E EAA RRA ERE LER LE REALE RELA ER ALARE 
02102 000 -BYTE 

894 021027 — O4S OS304S 031124 TITLE: .ASCII ’%%VT20 DIAGNOSTIC TEST MAINDEC-11-DBYTA-D-PB 3’ 
W895 021034 45 3501 
ao BIBS (ee aie 
4898 021056 040515 047111 042504 
4899 021064 026503 030461 5 
4900 021072 053102 04 o42055 
4301 G21100 OS0055 d20i02 
4903 BeOS wuete AYTEDE OS1WHO MESI: .ASCIZ °*FK SWITCH & LIGHT TEST”, READY FOR INPUT%@" 
4904 ellie 1524 020110 
4905 21120 O2004 O44514 04410 
4906 Oell26 020124 O4eSe4 052123 
4907 021134 O26042 051040 40505 
420g Oell4e OSH504 43040 051117 
4903 O21iso O44440 OS0116 052125 
4919 021156 O4004S 
4911 021160 OHOHHS CH2522 O42040 MESIA: .ASCII ;%ARE DEFAULT ADDRESSES & VECTORS OK (Y OR N) ? 2; 


Lar 


LO? 
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Gsiigi rape 103 MES4: .ASCII ;"FK CHARACTER TEST”, INPUT “LOWER CASE’ CHARACTERS. a; 


T 
4912 021166 O4310S 052501 052114 
4313 021174 042104 O4eS522 
vale Bsns falas Biles Bares 
491 lel 1 il 
491 1224 05 02012 
4318 021232 024516 037440 040040 
MES2: .ASCII °%"FK LOGIC TEST"xx@’ 
q BB ISN Bases Barer? Be8008 
% 1254 OS5iS05 021124 d2244s 
4923 021262 100 
4 oe oy 0521.23 MES3: .ASCII ;“TEST NO. (0-22) ....%a; 
4 1 47 117 Oe404 
4926 Oel 460 031062 020051 
4927 021304 027056 027056 
4928 
4931 Oel 1 
4932 Oel O26042 O47111 253 
4933 021342 020124 O46047 053517 
4934 021350 051105 O41440 051501 
4335 356 023505 041440 40510 
oe elves Gviss Bade 
4939 376 OS2045 041125 020105 MESS: .ASCII ;%TUBE ’0’, °1’ ,°2’,°3’, OR °4’? a; 
4940 404 ? 7? 02344 
4aq 48 j 1 
ie . 4 be6047 
8944 uaa aay 
4946 440 O4304S 051117 O42511 MFCP: .ASCII /%FORIEGN CHARACTER SET (*Y’ OR 'N’ ?)a/ 
4947 446 047107 O41 040510 
4 4S4 1 1 
1 404 

u 4 11 
4951 4 1 

S04 

S06 


6 
pepe OSeieS MES6: .ASCII ;%INPUT CHAR., TEST 1.9; 


OS21eS MES6A: .ASCII ;%INPUT CHAR., TEST 2.a; 


- 
fe 
2 
a 


a ie Bee ue ie 
WaE8 e36 : eSe4 0S2ie3 
sete See Gsolie o35is3 MES6B: .ASCII ;%INPUT CHAR., TEST 3.4; 
4 14 | 1 
496. 576 020054 O4eS24 052123 
604 031440 


oe 0 he Bb be 0 be ph pe poo be fs fe Os ee =o 


Re 
RW RUVVVOUUUUUO OOO fru fron 


496? 


p rate peer? paris, MES7: .ASCII ;%"TEST COMPLETE” 4; 


oo 
as 


= 


MO? 
eeaR BT” DIAGNOSTIC TEST PROGRAM MACY11 27(732) 16-FEB-77 09:54 PAGE 90 


021624 052105 021105 020040 
040040 


49639 021632 
49g 1634 1 MESB: -ASCII ;TEST ADDR.? a; 
2 BINS BUR AID OO 
ioe 16' 1 
pe le 021651 O42 OS2l26 O30062 MESS: -ASCII ;"VT20 SYSTEM EXERCISER TEST”. ; 
4977 021656 OS144O0 051531 
‘3 : Biel Giztes edie 
4 
“390 O31 
4 1 1 BYTE 12 
4983 021710 Ole ‘BYTE 12 
ie rae Ms eat es 05 ASCII ;NOTE: THE HOST DIAGNOSTIC, EITHER FOR THE POP-8 OR 11 MUST BE; 
uy 7 1 1 
4987 021732 043501 047516 052123 
4988 021740 O415S11 4 O4450S 
Ygsg 1746 124 304 
uy 1 17 2510 
1 1 
sae Oe Re bee ey 3 
yggy 


: 
a 


S 
eof 
iS 
Be 


-BYTE 12 
-ASCII ;LOADED INTO THE HOST COMPUTER BEFORE RUNNING THIS TEST.; 


BS 
RRP 


: 
Fan 
eres 


-BYTE 31 
oie BizioN MES1O: .ASCII ;"VT ODD ADDRESS TEST”.a; 
1 


ett 
frmmmD foo frou fe 
aq 3 
Aze 
Roz 8 


fore 
in 
R 
B 
> 
2 
oO 
a 


26 4S 046114 O4350S MESSA: .ASCII ;%ILLEGAL TRAP TO a; 
Sess 


020115 MES6C: .ASCII ; FROM a; 
ee MES8O: .ASCII ;CHARS.: 0000 RECV’D: OO00- XFERS.: 0000 ; 
4 


0 bb bb oo pe 


WONTUE We 


afatetatatatatatey 


unr 
SS 


EEE 
wre 


150 
3004 


ruoruvrururorm ss rururu 
mee 
Nes 


at iaetond 


043040 047522 
: 

04 

104 
104 


ee eo ee - ee ee -one <> 
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S024 022206 030060 020060 OS4040 
S025 022214 O42506 051522 035056 
S026 Oeee22 030040 030060 020060 
B22 cos SHES Bile =| ATT ses. com 
Oee 01 BYTE le 
5031 Oe2e4s 012 BYTE ile 
022246 031 ‘ BYTE 31 
. N 
p22esn fot ‘BYTE 
5036 Oeeesi O44S10 020123 MESI1: .ASCII ;THIS MESSAGE IS SEING LOADED FROM AN ODD STARTING ; 
S037 OeeeSb O42S1 1523 043501 


old pels uesee LASCII ;ADDRESS. HOW DOES IT LOOK??; 
? 


le? 042040 O4eS17 

022354 Oe0ie3 OSel1i1 O46040 

5049 Oee 047517 037513 077 

5050 0e236 1 -BYTE. 31 
08637 2 ta MES13: .ASCII ;%TST NO PASS MA CSR _——ODATAa; 
1 

e404 440 

041440 

O2e420 051123 ae: 


020040 
020040 
tee 2: 0S : 
pS 5 OS1 MES14: .ASCII ;"FK REPEATIBILITY TEST”, READY FOR INPUT. %@; 
oso O44S24 


Pug 4524 
2454 OS2040 051505 O2112e4 
6 4 042522 042101 
24 0131 047506 O20le2 
022476 O47111 O5252e0 Oe7lc4 
epee aaa rm 0510 027122 MESIS: .ASCII ;x%CHAR. CODE(S) 2 
S0bE ae Bi isig Bett? 024105 eu cobb: ; 
Bs - 
5069 022526 O2244S 051524 020124 MESIE: .ASCII ;%%TST NO PASS MA CSR MARQ; 
5070 022534 047516 O20040 o40S20 
ALTA: 
1 1 
5074 10! 100 


2564 1 
5075 
20 a Si BS MESI7: .ASCII ;%xTST.NO PASS NA SHIFT IN/OUT EXPT’D RECV’D@; 
i 
ee Ge RL Eas ‘ 


g 


< 
w 


ee 


S 
®B 


‘ 


ROR BS BVRR POR Sawer -OSSVERNEONeS 
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be 


pesos? OW41e3 O43111 020124 
O44440 027516 052517 
Oeeb34 020124 O42440 050130 
pecs pesos 020104 O4eSee 
1 042047 100 

022655 OWS O4eS02 O4YOSO3 MESI8: .ASCII ;%BECAUSE I LOVE YOU!!~a; 
Oeebb2 0515S Oe20105 de0111 
Osee7e Os28i? GON] OAGDYS 
Gero 106 047516 MESI9: .ASCII ;%IF NOT WITH THE ONE YOU LOVE,; 

12 020124 044124 

042510. 04 

O22’ 042516 OS444O 052517 

34 053117 026105 

2 053117 020105 -ASCII ; LOVE THE ONE YOUR WITH. %d; 
O2e7S0 044124 Oe019S 047117 
O22756 020105 047531 051125 
O2e764 OS3440 OSelli 027110 
O2e77e O4004S 

041 02704S 1 CNTRLC: .ASC *tC%.9” 

Be8001 ie 022501 180 CNTRLA: ASCH *tAxa)’ 
023005 04S 100 CRLF: .ASCII °%@’ 


023007 077 d20040 100 QMARK: .ASCII °? @’ 


023013 O4S 2 031124 MES20: .ASCII ;~"VT20 LOGIC TEST”%a; 

3020 047514 044507 

3026 020103 0S2123 
023034 O2244 100 
023037 OWS OS104S O41S0S MES21: .ASCII ‘*%“RECOVERED FROM POWER FAILURE 2’ 
023044 ele 051105 O4210S 
023052 3040 O04 020115 
023060 047520 OY 020122 
023066 O04 O46111 051125 
023074 020105 1 

1 16 O52125 MeES22: .ASCII ;INPUT THE ‘UPPER CASE’ CHARACTERS. xd; 

083104 Oaes10 DesHNg | 
O23lle 050125 O4eSe0 de0l22 

31 O4eSe3 Oe0047 
023126 O44103 051101 041501 
023134 0S1S2e 456 
023142 1 


O0S2125 MES23: .ASCII ;INPUT THE *CONTROL’ CHARACTERS. a; 


023:72 O40S2e 
Oe3200 027123 O4004S 
023204 OS3042 020124 O44103 MES24: .ASCII :"VT CHARACTER DISPLAY TEST"d; 
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5136 023212 041501 
02 O44SO4 

13 
124 O44S06 MES2S: .ASCII ;"VT FIELD CONTROL TEST’d; 


R 
=e 
oO 
-— 


& 
is 
8 


o4eSe4 
050123 
O4eSe4 


: 
none 
8 
2 


MES26: .ASCII ;"VT CSR PRESET TEST" d; 


RR 
Bs 
RS 
PRIS ERY 
g 
R 


MES27: .ASCII ;"VT LINE FEED TEST" d; 


a 
; 
22 822 8 


04 1 40 MES30: .ASCII ;"VT END OF SCREEN TEST" @; 
Tie Ba740 O20108 
04 047105 > 


R 
& 
a 
R 
R 


MES31: .ASCII ;"VT BLANK CONTROL TEST" Gd; 


Oe34el O42 052126 O4O440 MES33: .ASCII ;"VT ALIGNMENT TEST" d; 


043040 MES34: .ASCIT ;"VT FOCUS TEST"d; 


SSEORA TERS S SOU SON OSS SARE 
R 
8 
~ 
58 
is 
a 


1 
: 953440 MES3S: .ASCIT ;"VT WORST CASE TEST"d; 


So3ers Besoa2 ene OS2S03 MES36: .ASCII ;"VT CURSOR MOVEMENT TEST”; 


I Se ee ee ee a er i 


023544 o20040 ied 020040 MES37: .ASCII ; In a; 
023555 O4O 052517 O20124 MES38: .ASCII ; OUT a; 
Oe3Sbe d20040 0040 


yy 020104 MES39: .ASCII ;"BOLD PRESET TEST"d; 
OS Oelle4 
02 


CSBVRRES—GwaVou Lan 


O47111 MESYO: .ASCII ;"BLINK PRESET TEST’d; 
051505 


Cnn UU UT UT OT On On OT 0 0 0 OF 0 OT 010 OF OF OO OF OT OT On Un On On On UU Un Ot UU OF UU 


Bb be he bh 0 


wo 
- 
fe 
os 
we 
o 
fo 
oO 
—-O 
-—- 
Ww 
oO 
an 
-_ 
tee 
~w 
oO 
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5192 023624 oS210S oS2e040 051505 
ue 023632 O2lle4 100 
l 1 7 MES41: .ASCII ;"BLANK PRESET TEST”d; 
cig ema |e ube 
S197 023650 052105 OS2e040 051505 
213 023656 021124 100 
04, 7125 MES¥2: .ASCII ;"UNDERLINE PRESET TEST”; 

5200 em) ous ONrIas gupenN 

023674 051120 O51S50S 052105 

o0Si50S Oelle4 


S202 

5203 : 

26he BB371 Age OS2eS22 047116 MESY3: .ASCII ;“RUNNING TUBE Oa; 
023716 047111 020107 OSeSe4 
Oe37e4% O4e502 030040 


3731 o4S 047116 MESH4: .ASCII ;“RUNNING TUBE @; 

3736 047111 Baio? 0S2Se4 

023744 O4250e 

023750 040007 MBELL: .ASCII <7>/a/ 

023752 OS004S ei MXORH: .ASCII /“PROGRAM RUN IS ABORTED/ 
Bee er if 

d24002 


04704S 046525 one MEDI: .ASCII /“NUMBER OF TUBES? a/ 


024010 Oe0l22 043117 040 
024016 041125 50S 020077 
3 EVEN 
024026 pesnae 020124 100 MUTP: ASCII /X“VT a 
S224 024033 O4S 045506 O40 MFKP: ASCII /“FK / 
2526 OS2103 MAUF ASCII / VECTOR AND ADDRESS FOR TUBE a/ 

Be 0S111 042116 
5S O40440 O42104 O4eSee2 
5228 OSiSe3 043040 OS1117 
S229 024066 O52040 041125 O20105 
5230 024074 100 
S231 Oe4075 O4S O42040 030514 MOLVA: .ASCII /% OL11 VECTOR FOR TUBE a/ 
52 Gei108 } 042526 d5e103 

Be 110 OS111 3040 OS1il 
5234 024116 40 O41125 020105 
5235 024124 100 

5236 024126 EVEN 

pea ADDRESS AND CONSTANTS TABLE 

5239 024126 MP: O 

5240 024130 001726 AVECTR: INITB ;CNTR *A’ VECTOR ADDRESS 

S241 Oe4132 001000 TACK: 1000 >*SP’ INITIALIZATION ADDRESS 
S42 134 UNITFG: 0 :SOFTWARE SW., SET IF BOTH UNITS AVATL. 
5243 136 UNITNO: O CONTAINS NO. OF UNITS AVAILABLE 
ce pare eB ouraine CURCERT bare 1S 10.” 
252 Petia Free a8 FEL Rey fROL Me HE Su. 

S247 Oe4i46 CHRCNT: 0 :*VT? BUFFER CHARACTER COUNTER 





vT Re DIAGNOSTIC TEST PROGRAM 
OBYTAD.P11 





024150 


rs 
2H} 


INST ERR 


SOS PS PTs 
2R8 


: 





aay 
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5 RUN ALL’ SOFTWARE SW. 
SSOETUGRE El, SET IF TTY AVAIBLE 
TP Ee EE ivING OR EXPECTING DATA 


;SET IF TRANSMITTING DATA 


;SET IF START CODE (377) WAS RECY’D 
;CONTAINS NO. OF CHAR.*S ON SCREEN 


;SET ON ERROR DETECTION, CLR’D VIA SWiS 


DOOD OOVO OOOO VO OOOO OOOO KDOOKOKO0OKO00000 


.=.+10 
=.+iC 


;SET TO STOP CONTINOUS TRANSFER 


OOOVO OOOO OKOVWOWKWO0O0000: 2 


os a 
<3 
ee 


vite 


AtATALATAT AT AT ALATA) 
Docs | 


a er 
WONIMUMCWMe-O 


§ 


$321 


O24444 


024474 
Oo4475 


vie DIAGNOSTIC TEST PROGRAM 





000000 
nee O0 
000000 


000000 
000 
000 

000000 


031 
03! 


900001 
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2 
~ 
xz 
— 
DOOD OOOV OOOO OOD VOOOVWHOVOOVDHODOOKCOOOHBODOOVB0000000 


ARTS A *1200’ WORD ’V 

i T p1Seuay TESTS. DATA TO 
ACH INDIVIDUAL TEST AND 
VTBUFF: .BYTE  €0S 
-BYTE €0S 


END 


;SET ON DL11 TRANS. INITIALIZATION 


;CONTAINS 1ST FREE LOCATION AFTER 
; THE USER DATA 


;SET IF COING CONTINOUS TRANSFERS 


; TEMPORARY STORAGE 
; TEMPORARY STORAGE 


; TEMPORARY STORAGE 
SOFTWARE PRINT INHIBIT SW 


; TEMPORARY STORAGE OF 'PC* 
; TEMPORARY STORAGE OF *PSi" 


;PERMANENT STORAGE 
: PERMANENT STORAGE 
PERMANENT STORAGE 
:PERMANENT STORAGE 


‘phe R_USED FOR ALL 
URED Is ASSEMBLED 


SST EERE Le GN TENT et 


MBL= 1 12598 c HES isss 1879 1$87 1604 1617 166C 2333 37i3 
UDIO = My 4Yy 4S94 
Au 1 2 8 
AUT 1 S38 
AUT 13304 3436 35598 
apt ni a te =. 3459 3516 3554* 3559e 3560% 3561 3563* 3564 5284s 
8 
SE ee ar 295S* 2963% 3010% 3075* 3787 4375* 4376% S2408 
BINDEC= 104024 issee 3180 3383 3188 3189 3132 3195 3198 3eCi 3206 3209 32l2 232i 
BLANK = 000361 14468 8962427 2432 4304 
BLINK = 362 14478 8=693417 4300 
BLKERR oe Tike a0 3634 3637% Seses 
= 
4 118% 331 3371% $3208 
BUFOR] 024414 3119% 3318 3372e% S3248 
3121# 3332 * S3e2l8 
BUF 1R1 4416 31228 33 3383% 53258 
15 uy 93% 2 ce 
UF 44 OL 160% 48 S4* ry 
024412 3142e# 3362 3404 38 
BUFSR1 Oe4422 3143% 3363 340S* $3278 
Oe iaoe 23/8, S456% 3472 3487 3494% 3646% 53158 
“38 53188 
bey fen saiet 
= 000010 1 * 1828 1841 1854 1867 1878 
SHREK] 007704 Bg31 5939" 2995 «29388 
Uv 
¢ Ke a07730 2340 caa3y 5333 981 
CHKFK4Y 010004 2950 29578 me 
C 024146 3759% 3770% 3771 3790 3792% 446% 4351 4358% 5Se47s 
HRCT S i127 25% 3503 3505* 3508 3510% S27es 
HRCT 191 38 
CHRCT 2 3205 52748 
CHRCT3 O2e4226 3219 52758 
CHREND 02072S 2969 48138 
Can le sare Fat 
eee nye ga33 weds 4450 448C 4527 
CLRFKY 016710 1647 2660 2677 2693 27093 2723 2972 42688 
CLRFLD= 000360 14Se8 4308 
CLRYTV 016774 1648 2137 2159 2183 42898 
CNTRIT O206S3 23965 47628 
TRLA 023001 3786 51018 
CNTRLC O22774 1659 51008 
CONTRL O20640 2353 47518 
CORSIZ 001702 1488 14928 
CRLF 023005 3801 4547 51038 
ca aooobe [aege 1962 1982 2001 
= 
DECOUT TEE os 423 4O4ls 
DECPNT Oiete4e 4231 42498 


DEC) 016632 4e4e 4245s 


¥T20 SYSTEM DIAGNOSTIC TEST PROGRAM MACY11 27(732) 
R SYMBOLS 


OBYTAD.P11 

LAY = 1 
LAYL= aM 
104000 


SPMS 011619 
i07ee 


FKERR 174 
FKFUN  OO07416 
FKINT 001500 


te 


CROSS REFERENCE TABLE -- USE 


5080 
5632 


3140 
438S# 


4063% 


S01 
Bai 


3157 
53298 


4070 


36% 


29658 


4064 
Soa 


32348 


2405 
16 


S253 


16-FEB-77 09:54 


far 
3803 


3237 


PAGE 99 
2433 2505 
2324 

gee (Baas 
2436 «86 2512 
3512 3625 
4373 
53008 
1820 1831 
2004 2028 
ec48 2557 
2726 «= 2730 
3011% 23031 
2968% 3020 
2S77%  2578% 
2629%  2630% 
2750% 2752 
e8el% 2831 
4434 
167% 1877 


351 


2844 


3643 


32033% 
3042s 


5313 


2894 


3694 


2974 


3699 


2693+ 


vs 


4048 


S246 8 
4433 


2590 
2643 
2767 


26992 


4e 
ccs 


§383 


42592 


GRATER RP TT Om 


006640 
006714 
006770 


geae 
“I 
deiy 


N™N 
~ 
say 


88 


-— =e 
+ 
= = 


7 
=, 


Bees 
SRB SERSRe di 


7 
+ 
- 
bb be bh eh pe 


BeRpReeeRE 
SeRENetaes 


001374 


8 
30288 
3035 


2889# 
eat Be 
448 ra 
* 00# 4193 4261# 4270 4271% 
3010 
3007 
4598 


3426 3439 3513% 


1563 4178 


3527 3895 3603 3608 3611 


3037 3040s 


SASTE EL FULL. UTD IT Oe ree 


ree 024160 agp writs 4221 S2Ses 
TREG= 139008 1e498 3861 3898 4038 4OSS 4382 4466 4526 
* 3432 3463% 3659 3662% 3664 3837 4070% 4072 52768 


2538% 2774% 4583 45968 
3758 3760% 38118 4327 


zz 

agaae 
Sirians 
ra 


Bat 
BBE 
Eevyey 
33 
3 


N 1 cab 15418 1614 
N 1 149 1s44e 
NITCB S07 1560 1562 16138 
INITO.§ O0e4S6 1S43 16198 
IN ib 7Se 2103 2il6 ee0es 2227 
NIT 1624 1239 14788 
TA QO14364 376l# 3762 3776 3791 
b 14416 37698 3797 
NTC 15179 gery 2297 EE 39118 
INTRNO 344 Sel 3523% 04s 
INTRNL Oe4346 53058 
ab 024350 53068 
INT 024352 53078 
aes HE 230 oe. : 2336% 3911 3918%  Se498 
KSTOR1 Se l# 2919% 2945 2967# 3311% 3322 3326% 3337 341% 3352 3356% 3367 
KST aie 3717% 3719 3724% 3725 3726% 3729 4034 53428 
KST Boies e9l# exe yy79% 4SO4* 4510# 4S14* 4Se3* 4S39* 4558* 4560 S3448 
KSTOR4 Jt *# 4374% 4379 5345s 
T 3681% 3689% 4497# 4514 53468 
KST 4496% sag 53478 
1S2 agie 39198 
15304 # 3975 
LDC 1Se32 33218 
CDcHRe 12 4 7? F 9738 
K 16654 317 3ac3 2920 3014 42598 
Ms thie 1eS4e §=64301 4303 4305 4307 
I 164 4180 4183 4186 41898 
VTVT 016740 131 2149 2170 42788 
LINK 125, 3435 
LOOPle 00351 187 : 1 
Sores | BNL 19888 
MASK 015166 3682% oo3) 3695* 3884* 3890 3895* 39008 
+ . 


i] 
1738% 2S537% 4494 4yS4S* 53368 


MESPR 4541 
SPT y7age WNL HHG3H 53978 
1 i 8 49038 
Sia 02116 1557-49118 


bertas Bit” ta 2 re SR ow TM Sere ree BS, PAGE 102 


—— 
BEN eSB eeRR 


RRERERERRRS 


So 

££rcul 

H— ee 
Roo 


[on] os] 
—— 


Sift 
Mr wow 


wr 
Neer 
wor 


nero 
Soe 


51798 
51828 


1S74# 
SesSs 


3082 


3781 


iS79# 


49768 


3807 


1586 


4222 


1591 


os 
a 
_ 


4340 


1598# 


1603 


1609% 


3830% 


3831% 


3833 


38448 
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RENCE TABLE -- USER S 


NOTTY 001634 1240 14808 ' 
NULCTO 1g 98%  3534%  Seb4s 
NULCT 1 Se 
NuLCTe 14 a 
NULCT. 16 tt 
rb nt. Ogi ee 
Aad 14434 sone toll 3798 a _ 
=Bb000? ce CUE Cee Gat Ga 
# % ry 103% 104% 


ce7k 47s : it 270% 


5208s 
Size Solis Stise Stibe 3140s 
Sean 309s 


$300 

# % # 

3546% 3548% 3590% 3595%  3597% 
3821# 3843% ssos8 3879% 
4195% 42378 Ye44e 4e47e 4eb4e 
4403% Y4OSe 4415* 4479% 4505s 

PIMP 1 1619% 164) $2398 

POP1SP= 0057, 15108 

POP2SP= Oerb. 12138 3 2691 2707 

PRINT lool iSees i 154 ics 5 ? 

= 

1é38° fess = ieee «T7881 
4214 4218 4335 4338 4512 

PRTERR 120 4479 - uaace 

PRTOCT= 104014 12588 Yel 4e 4548 45S3 

PSW 001312 1313@ 1461% 1743% 2151%  2670% 
4e8ee 42e89% 4318% 4587% 

cuales 746 istis 

= 

PWRF AL epi 1525 40848 

PWRUP 16050 4092 4O94% 

QMARK 1667 3803 [1068 

RBUFO 001530 14le8 3577 

RBUF1 001532 14138 

RBUF Rn leae 14148 

RBUF 1238 14158 

Bk 0015. 14088 gicae 

SR1 001522 14098 128% 

RCSRe 001524 14108 3162% 

RCSR3 001526 14118 3145# 

RECSWO ASuige 3094 3466% 3544e 3591 3647% 

RECSW1 172 52578 

REC 024174 258% 

REC 024176 52598 

RECTRO 024314 3182 S461% 3538% 3631%  367S% 

ReK TRA 024316 3194 52938 

RECT 024 3208 Sess 

RECTR3 see see? 52958 : 

Kya O1uo34 seis 3675s 

CVBB 3620 


42284 
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RECVDO 014004 3656 a. 36638 
REEVES 843928 Be | BRI" a300 3208 © 38778 
awn aiins 3581 oe 35918 
998 
: ee cn ce 13 nes 
C 1 36 42a 
RECVOD 013706 3589 3630 3645S 8 
RECVOE 01401 09 3627 3650 36658 
CV 1 8 
1 14 8 
es 1 a 
L 12556 3484 3653 
RE 005126 2235 22438 
REPTER 010264 3027 3030 
idk | poss oe 3029 30368 
fe i” Geiaes 453% 5355 3476 3493% 3654 53088 
RESTRG DeuSbe esis 
T 0204 THO¥ Py ¥ é 350% 395% 2421% 244S5* 2461% 2476# 
aseay, semie: yrass Secex Sess 5005s Saeax Seeex G10" Sees Geode Scags 
RINTO 001540 14168 aah 1596 * 
RINT 061544 14188 100% 
RINTS 01804 l4ses | 3iaee 
RLYL Bp ieee 14178 99% 
RLVL1 O01546 14198 3101% 
Ve 0015S2 14218 3150% 
RLVL 001556 14238 3133% 
RUNEM 016000 4067 4069 407S8 
RUNSWH s6e 1es08 1730% 4066 Seuss 
RO =%000000 11968 eiiee 1517% ae 1528% 15308 1539% zeta if 4329 
5 : 301 gae6s 53878 Estes e373 53788 ms euv74 Bes 
x 
Be Bit Be ga: He: Be Bet He ae poe 
ed 1 Bich bo : 3110s ait S19. {17s sig 
wn Ret Ue ut Ue Ae Bik Bie Int 
3 3399% 3410% 3417#  3418% 19% 420%  34S0# en 1s 
36 specs sPaay arog 3698% segs 391 3528 393 : 39 ; 
4OS1# 4053 08 4102 4156% 4157% 4160% 4161% dies 4178% 
ms 1 4243%  Ye4bs 4302% 4304%  4306# 308% 391% 
Rl =%000001 11978 1489% 1490 1492e% 1493 1669 1670% 1673% 1678% 1765% 
soeee ca ao te soi7s 1818 Aste A cosas sce 
55 £ 5534 88% soe Site 530 * 26% 535 Saeoe 


8 7% 
89 3 937 = e951 959 e965 = e989 3022 
S35 236 31 Saige 3328 333% 3343 3348% 3358 3363% 





aes pe eee ee oe cee eee oe ee ~~ =< 


NOS 
vi20 SYSTEM DIAGNOSTIC, TEST PROGRAM | _MACYLI.27(732) I6-FEB-77 09:84 PAGE 105 


eet BY Bet He PR Pe OF. Ge sn Sete 
3957 gage 


igure se 38 4101" 4 53 nfm u <1 41412 41S 370 73s weep 

Cnc am a 2 

Rez =%000002 11388 1531% 1S96% 2117 21728 3793s 2205% 3335" sBels 2869% 

7 Hts 1L3t it 1508 3 3 I 4 
ee is. 14 155% 1 t 1 , ide 1 . 5535 182% ae oH 
igs a ata genes agth*. Side Sazcn Secs Sere Moss Sales 
; see , ie aieee gee Ste aiee* ausg* fe" ge ade 

Hl ee a a 
1% 3 3247 19 x Bath aP3q 3}, US% YBS 


4 45e0% 44Sel# 
a cae tees? Tees" St 1991898 tBeve 188x853 1888 hig Isser 1883" 





3696% 3714 3916% 3924%% 0 4yo099% 4121 4139% 4190% 4192% 
4348% 4433% 445e#  44b1# 
R3P y i 4230 4238% 42538 
R3PRT * 35518 35498 
eel Biibsn 3582# 3583% 3584 3613% 3614* 3615 3666% 
~%000004 ] # 6% 15/ ipcee sait* aa 677% 2880 essix 2882 2883% 
# ¥ 16 31 346 3361 33738 3384% 33358 sites 
a I ee ee Ce ca 


y4a4e 4453% 44o2e 

RS =%000005 O48 4eL0# AReg* ARast A983" 498 . Aaeae 2370 2381% 3012% 3023 3040#  3678% 
ee UT ye 
vat 1 5 gt Be 
SAVBF3 Ole 3ebl 3284 7 34048 
SAVEPC 024450 4115% 4127 4133% 4414S 53388 

VOLD 244 2879% } 2885 7 2 '] 

VP aie 41168 TE Gizde = 4144 ; 8 

1040) 1e488 4 4032 404S 4378 445 1 4488 

pew oa Sees aries nis sie mir * . 
gCOPE = TBs ibaFs id5d 1 ibe. Tecd 1826 1839 18S2 1864 1875 1890 1903 1915 


Se me Cr me ce 


2682 42698 )43=s e715 2? 2749 «= a76lSsi«i27722~Sfs«2?79Sss«BO? «S82 
SCOPEB 020336, 4578 45868 , “. 
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DBYTAD.P11 CROSS REFERENCE TABLE -- USER S 
1290 pele 3 
Ser, 1747% s eo NSS 4551 4583 4Se8S* 4589% 45978 
4582 4S84Y 45898 
020312 4SSi8 4604 
Sorc 024430 eo74e 2086% 2102 2115* 2216 53308 
SERFKO 011626 3108 32418 
SERFK1 Thea 3108 32478 
SERFKe 011656 3153 32538 
SERFK3 011672 3136 «32598 
SERVAA 012664 SHS 3468 
RVAB O12e706 748 = 3491 
ise 77 = S479 N28 =: 3663 
1 998 8693535 
SERVCC 013064 3502 35088 3555 3565 3573 
SERVCE 011326 31788 03 3217 3230 
SERVOX 013116 3809 35158 
aenvik 12444 se42 48 3254 3260 34268 
12530 S440 = 4438 
SERVOB 012730 3469 0 34818 
SERVOC 013036 3490 8=— 35018 
senven 813108 a3 Sidde 3467 3471 3473 3488 3500 3504 3507 38138 863817 
SETBFO Oi2e036 3241 4 3288 33118 
SETBF1 Qle10e 3247, 3e70 ss 3293s: 32 
SETBFe Ole21Se2 3253 3276 3299 33418 
SETBF3 Qleeee 3259 6 3e82 2S 3305 = 33568 
TED 00 1516 1Se7 1573 1590 16698 
TFKA Ol644e 41918 4194 
SETLNE= 1 12538 2300 
ie, ce fe ml 7 
SETUTO 016360 4170 = 41778 
SETUT1] 016376 4172 41818 
SETUTe 016410 4174 4184s 
SETUT3 Ol64ee 4176 41878 
BAD 005074 2226 2234s 
SHFCUR 006106 2es0S# e511 
SHFEND 021024 e056 48878 
o 005536 23738 3 
SHFLST 005032 ece3s 
S 020026 e073 e2085* e2101% e2ll4# 45138 
SHFPRT 024434 1746% 53328 
TBF perl 2022 4 2039 2041 e167, «42168 2202 e203 8 2205 48258 
TSW Oe44, 1 1e9# e207% 4S9 4489 94508 53318 
SHF 32 22278 
SHIFT Boe0o4 076 sn30" 2 2119 22158 e242 1 
oP =000006 ,o0ge le - soree ier? iene oe a ae Cate 1285 = 
ci at Gr fu, Bit at Bol Bet BP oe, ae 
3361# 73 «©6374 —_—s93375 «376 3384 3385 3386 87 
397 33 3 108 3407 8 3409 3410 3418 421% 
3882 923% e7® 4O77e 4O84* 4O8S* 408# 4O87# 4O88* 4089 90% 
9 098 4 41 1 4115 4116 4117 4118 


4096 4097 4 0939 00 410 4102 
4Yl21e 4i22e 4le3e 4le4*e 412e5* 41ebe 4127% 4133 4134 4135 4196 
4139 4140 4141 4142e 4Y143e Y144*e 414S* 4154 41SBe 4206 4208 


YT20 He DIAGNOST NOSTIC TES 


DOBYTAD 


89S 
eh 
ps a 
ii 


2 
-_ 
o 


gees 


RENCE TABLE -- 
4278 4279% 
4593 
1e608 4550 
3740% 3742 
3766 3768 
3789 37968 
37988 
3772 3799 
23718 2382 
240S# 2410 
14648 2025S 
14688 2102 
14658 2086 
14698 2115 
2863 28698 
2878 28838 
1482 1639 
3096 3321% 
3455* 3619 
52698 
52708 
52718 
35958 
S448% 34S4* 
52978 
Se98s 
52398 
4328 43508 
1625 164S 
1620% 16c4% 
3826 38358 
13188 1500 

2934 
4021 
13198 
11928 3532 
11918 3532 
11908 
11898 
11888 
11878 
11868 
11858 
11848 
11838 
11828 
11818 4021 
11808 2245 
11798 4YS06 
1178% 2930 
1177% 
3093 
17193 30738 
26S4 cbS98 
2667 26758 
28078 2811 


T_ PROGRAM MACY11 27(732) 


USER SYMBOLS 
4349% 4374 
45S 4561 
37448  4399% 
377938 
38038 
2042 2058 
2136 2157 
3336% 3351% 
3626% 48% 
3651 Se3968 
4364 
3824 41698 
1640%  1644% 
1503 1505 
3004 
44265 4435 
3584 3593 
3584 3615 
3839 4068 
4019 
3075 
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4375 


4400% 


2074 


4377% 


4402# 


S2418 
45 


4431 


4406# 


3456 


4457 


440S# 


3545 


4478 


44 10% 


3578 


4504 


3586 


4586 


$3288 


4590 


4592 


2780 
4519 


SHER ML 


TAGB toxhiyd 
TAcrA if 
TAGFH 1 
TAGH 
TAGI 
TAGVA 44 
is Oy 10 
is Be 
TAGVE 004672 
TAGVF  OO04716 
May Ot L2i6 
as i 
TEMP1  Oe4440 
Oe444e 
15520 
TESTSW 013760 
TESTX 14162 
STOO 002750 
TESTOL O027Se 
TESTOe 002754 
em Bs 
ee Bs 
TESTO? 002766 
TEST10 002770 
TESTi1 002772 
TESTle 002774 
TEST13 002776 
TEST14 003000 
TESTIS 003002 
TEST16 003004 
TEST17 003006 
TEST2O 003010 
TESTel 003012 
TESTee 003014 
HEND = 104023 
TITLE 021027 
TKB 001316 
KS 001314 
TKSFLG 014330 
OPC de4156 
TPB 001322 
TPS 001320 
TRANFO 024304 
TRANF1 024306 
TRANFe 024310 
TRANF3 Oe431e 
TRANO 11706 
TRANOA 013162 
TRANOB O13e3e 
TRANOC OQ13e6e2 
TRANL 011722 


1 


> p< b— pe be 
es 


Ce petnit aa SS 


WWwrr 
~— 
3 
bo 


Bsnges 


T_PROGRAM MACY11 27(732) 
ERENCE TABLE -- USER SYMBOLS - 


2956% 
2964% 


3547% 
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» 4O2S* 4OS1% 4095 y475% 4498% 4502%  4562% 
qage 3983 yolox 4Ol4e 4Oes* Y45Si% 45Sex 4554 
2468 2483 2527 
4317% 
sbeue 3868* 3871% 3894* 4O4e 
3857 3869 3892 4413 
3676# 52888 


$3348 
53358 


SASH OURS LSE, BARRE FEET St ree 


011736 


005740 
ie Bak 


¥YTCAR 001504 


VTCHAR O0S166 
YVTCRLF 017350 
YTCSR 001510 


YTCSR4=~000004 


YTCURS O06042 


32768 


as 


3620 


363. 


4428 


3981 


1613 


3873 


seo 


HHS 


4015 


1626 


1623# 
1530 


52608 


4549 


40ES 


1653 


1643# 
1556* 


1 
2032# 


4591% 


43158 


1759 


52458 


4371 


2995 


3709 


3831 
1595 


3749 


4169 
3078 


42il 


4171 
3086 


1966# 
2062 


4315 


4173 
3130 


4423 


4175 
3268 


1986% 
e2ibe 


5 
‘ 
’ 
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CROSS REFERENCE TABLE -- USE 
¥TDUMP Rhee ta 4504s . 
v 3 
Cn 
y 173le 43808 4 4 
VTERR 017532 1741 44478 
YTERR1 017614 4460 89 YH 
V 17620 4463 44658 
VTER1 17336 4381 43878 
Wi Be HE 
“ 1701 2461 
VTINT 14038 4278% 4egl# 
VT. LYE 1685 1731 17508 2846 
ae 
i 12098 1737% 1776 18ie 1816 1829 1842 1856 1963 1979 1895 1908 1920 
1935 1951 1963 1983 2002 2043 82225 2232 2241 
YTMD1A 223es ee97e = 2303 
VT! 23188 
¥YTMDeB 2319 323 2327 = 2331 23368 
VTMES D17aNe 1289-43718 
VTMOD1 O0Se26 1689 2285s 2294 
VTMODe 005322 1691 e235 2e3l28 2333 
YTNORM 017736 oe 45008 
¥TOOD 136 170 eSels 2528 
Vex Gaeta 
YTSAR O01 14008 1891% 1893% 1904 1906% 1916% 1918* 1930% 19338 1945 1947% 1965%  1980% 
1 eOec# 2039% ecCS6® e2l30e 2148 eclb8* ei7S*# 2202 cel8*# eSe5e 405% 4lbc# 
YTWORS 14 1703 768 2484 
VTOCAR 001410 13588 150 $77 4179 
TOCSR 001414 13608 3088%  3172% 
YTOINT 001420 13628 
VTOL 00142e 13638 
T OO1416 13618 
¥YTOSAR OO01412 13598 3076% 3114s 
YT 003142 1742 17618 
VTLCAR 14 13678 4182 
1CSR 14 136 3089#  3173% 
VTLINT 1434 13718 
VTILYL 001436 13728 
YTIMAR 001432 13708 
VTISAR O01426 1 3077 3115% 
YT10 003422 18Se8 
VTil 1 
YTle 00 18758 
VT13 40 bs 
YT14 903576 19038 
vTis 3634 19158 
VT 003666 19298 
YT17?,——-- 903730 19448 
¥Te 002166 17748 
YTOCAR OOL44C 13768 4195 
vTecsR OC1444 13788 3083" «62164 
YTeINT Pat aee 13808 


VTeL¥L OC1452 13818 
VT2MAR COL445 13798 


¥720 SYSTEM DIAGNOSTIC TEST PROGRAM —-MACY11 27(732) 16-FES-77 09:54 PAGE 11! 
sevtae Bit CROSS REFERENCE TABLE -- USER SYMBOLS 


¥T2SAR 001442 13778 30828 3156% . 
VT20 003772 19898 
VT 19728 
vT 19798 
vT 19918 
VTe4 19978 
V725 004130 20138 
VT26 004136 20218 
YT27 004206 20388 
men l r} 
YT3CAR 1454 138Se 4188 
VT3CSR 001460 13878 3081# 3147 
YT3INT 001464 13898 
VYT3L 001466 13908 
VT ppl ee 13888 
VYT3SAR 1456 13868 3080% 3139% 
¥T30 004260 e0SSs8 
YT iis 20708 
VT 1 0398 
VT 1278 
VT34 4 1478 
VT35 40 eléss 
YT36 004730 21898 
vT4 003236 17978 
VTS 003262 18098 
YT Basses 1826 
NATTSY Moses (Seas 1739 1811 1894 1907 1919 1934 1949 196i 1981 2occ0 2623 2040 
= 4 1 
20S 3 2134 eles, tes 2204 2219 
WHY 017144 4331 433588 
17154 43428 355 
T 3342 34 
“rele 013350 3437 35718 
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sE38" seaee ag sre 4 See 26678 682 26838 698 26998 7iS 27168 
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27368 2749 e7S0# 276i e7628 2779 27808 2802 28038 2820 eseie 2841 estes 

SE 17104 1 43268 
XASEM 17116 4 4347 
XASEX 17150 4337 43408 - 
XBINDE 016546 309 4228s 
XBUFO epee 14298 8 =63499% 353Z7% 3547  3678% 
XBUF 1 1572 14308 
XBUF. 001574 14318 
XBUF pola7e 14328 
xC 1560 14eS# 3126# 
XCSR1 001562 14268 3129% 
XCSRe 001564 14278 3163% 
XCSR3 001566 428% 314% 
XDELAY 015540 1293 40128 
XOLAYL 015550 13 4Oi4s 

LAY] O1SS566 40178 4024 4C26 

LAYe 015630 4022 40278 
XOLAY3 015614 4018 
NEOSEF 015656 129 NOuSs 
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rs  feade ecg Bese, Beg «eee 
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2625 2638 86 2651 2666 
1839 18S2 1864 1875 


ScelBe6b 
ae 


2698 
1903 
58 
212? 


2715 
1915 
147 
15 
91 
is 


2735 
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165 
738 


929 
165 
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ROD 
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3579 
492 
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3661 362037277422 ss3759)—ss378D—ssB18 S322 2S 3932 «=: 3940 
4177 Ye 4263 = 4271 428242924318 «= 438504372 =: 4385 


Np 1561 1621 1641 1663 1788 1800 1812 1829 1842 1879 

Sl fe Es Se Sl Se gy Gl ay 
© wo mf ee OR 
- 2 me me me ue we ae 


EMT 1246 1247 1248 1249 1250 1251 leS2 1283 1254 1255 
HALT i 1§ I i i il i ia 1888 1525 1$33 1S41 1655 
a 
INC ig ipsa i 18 7 1 
gl oe ue gon Be BE ae i 
, aes 3081 3088 S416 83448 = 35 
a a ee 


INC 1574 1591 1809 4400 
Ree eee ee se 
JSR vate Te 1S ; lees 1645 yee 1648 He 
| Hb go ge 88 gs ge oh Be Be 
glle 3116 3140 3132 agi 324 3247 3 
oh 82 328 3289 
oe iy we ee Rl Gl fe of my es 
MOV 157 1359 1284 147 1481 1482 1488 1489 1493 1494 
Ca ae ee ae a 
1618 1619 1639 1646 1649 165 1869 1520 1671 167 
1741 1742 1743 1744 1763 176 1776 1786 179 
1841 1853 1854 1 86 1876 1877 1878 1 
1917 1931 1932 1933 945 , 1946 1947 1950 1 
2001 edeu  20eS 2039 2041 e204e e0ss e072 
we GS Bb ue EP Be Be Gel ge Be 
356 Ht 330 e350 2356 3700S 2371 37 395 401 
4S 61 e476 = e494 $00 862501 
36 eS39. e440 PSH = e657 es8e2 ss 2S99st—i«2OS 
669 = e671 e684 2685 e686 c68 eb99 e700 e701 
2796 esiS e28e2l e856 486 287 2879 
7 3010 307 3075 308 307 3080 3082 
3102 Fe Tet a ts a 3108 3109 a148 3 
We He Hh ais ai ais ie He 3 
ve HR UN UE de at i ed 
3197 3199 3200 3204 3205 3207 3208 3 
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3982 41g 40184 404% 4047 
yoss 4 4 4091 4092 
Hig, 4 41S 4116S HUI? 418 419s 22k 22 
41 41 413s 13371384139 
41564157 4b YL 41784179 4B 4184 4 
41 4 4 42 W231 4232 «4259S «eb] SS 42BB «YY 
43 use? N3eQ gga 7S 2 wee iN 
’ W462 4464 44 
4502 4503 4510 4514 19-4823 4557 4558 
401 4603 4808 
move 1565 1579 1698 2355 2375 2377 2403 2409 2427 31 
3002 see 3034 39 3041 = 32 ? 18 19 
il le 3837 W7 3570-38 3 25 
36 3693 3694 3699 377538303866 3 
wows «= 460 Haug YugS3 Wage 430443088 4389 
NOP 148 ay 14 1486 «148714 150215131 1761 
2299 2553 4205 
RESET 167 7eN I I 1973 1992 2014 «= 2071 += 2100 
7 4103 420 
ROL 234 2006 3685 BE 3687 3888 
RT $2 2971 3043 3378 3389 00 3411 3743 3754 3802 
ue? 4 q 4074 407a.«Cisisee «S446 = 463) He) 4309 
RTS 8 74 ? 4 4 
ef see Eu Ce 
4272 42834 4319 4353 4415 4570 
sue a 4209 «4210 «0424437642 4539 
TRAP 1 
TST 1e72 1490s «1498S s«1S05 15 1559-1613 1653 1750 
2088 2117 2138 2176 2217 2555 2590 2643 2751 2763 
2939 2949 295 2995 3023 3428 
74 87 3503 1, 3525 359135093619 3b 643 
749 3819" 38 383 311 3941 4017 
dee 4351 4423 4426 4435 4447 4449 4459 4491 
TSTB) = -2376«S 2737275202793 eB12~Ss«PB70 7 2936 3020 342 
3805 3857 3 43 4413 
WaT  BBbH 2922306 
AetIr 48854903120 u929 «4939: HSH 
8 5014 01g 50206 036 5045 505 057 
510 101 5103 5106 510 114 Size 135 
sige Bl 5169 51735179 See 518s 51908195 h 
.BYTE 3400 (Base 2449 BSD 24GS Ss MBHSCi4BD SBI 
33 3992 3993 398439 3997 3998 ©9999 4000 
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CRO 124. ¢ 8 

NLIS 11 1 2 1775 1785 1798 1810 
$738 4 he 

tbs 7620S si2780)0Ss«seB803)0SseB2l)~=—Sss BH 

“REPT 12 

TITLE 1170 

ORD 3549 3666 4253 


ERRORS DETECTED: 
DEFAULT GLOBALS GENERATED: 0 


£ DBvTAD. SEQ/NL: TOC TOC/SOL/CRF /PAGNUM=DSK2: DBVTAD.P11 
RUN-TI 10 2 SE 

RUN-TIME RATIO: 13B/ieeio. 3 

CORE USED: 14K (27 PAGES) 


ded8 


dees 


1891 


